Программу надо составить в паскале:
Составить программу определения вида треугольника по двум углам (прямоугольный, остроугольный, тупоугольный)

обожэжтымойживи вечно

var a,b,c:real;beginreadln(a);readln(b);c:=180 - a - b;if (a > 90) or (b > 90) or (c > 90) then writeln('Тупоугольный') else if (a = 90) or (b = 90) or (c = 90) then writeln('Прямоугольный')  else  writeln('Остроугольный');end.