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, скажи допишу
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, скажи допишу