PascalABC Нужно написать программу с "IF" Вот сама задача: Даны два угла теугольника (в градусах) (которые вводит пользователь). Определить, существует ли такой треугольник. Если да, то будет ли он прямоугольным?
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, скажи допишу
Answers & Comments
Verified answer
Vara, 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, скажи допишу