Предмет: Информатика,
автор: Karlifan
PascalABC
Нужно написать программу с "IF"
Вот сама задача: Даны два угла теугольника (в градусах) (которые вводит пользователь). Определить, существует ли такой треугольник. Если да, то будет ли он прямоугольным?
Ответы
Автор ответа:
0
var
a, b: integer;
begin
readln(a, b);
if a + b >= 180 then
writeln('Такой треугольник не может существовать')
else if (a = 90) or (b = 90) or (a + b = 90) then
writeln('Это прямоугольный треугольник')
else
writeln('Это треугольник')
end.
если надо записать в стиле PascalABC.Net, скажи допишу
a, b: integer;
begin
readln(a, b);
if a + b >= 180 then
writeln('Такой треугольник не может существовать')
else if (a = 90) or (b = 90) or (a + b = 90) then
writeln('Это прямоугольный треугольник')
else
writeln('Это треугольник')
end.
если надо записать в стиле PascalABC.Net, скажи допишу
Интересные вопросы
Предмет: Английский язык,
автор: Anonim2356
Предмет: Химия,
автор: kkiyemov
Предмет: Математика,
автор: masichmary
Предмет: История,
автор: maslova74
Предмет: Информатика,
автор: czar112