Написать программу в Pascal. Даны два угла треугольника (в градусах). Определить, существует ли такой треугольник. Если

program tryangle;var a1, a2: real;

beginwriteln(\'Введите величины двух углов треугольника через пробел (в градусах)\');readln(a1, a2);

if ((a1 + a2) < 180) and (a1 > 0) and (a2 > 0) then writeln(\'Треугольник с указанными углами существует.\')elsewriteln(\'Треугольник с указанными углами не существует\');

if (a1 + a2 = 90) and (a1 > 0) and (a2 > 0) then writeln(\'Этот треугольник будет прямоугольным.\')

end.