Question

Var a, b, c: real;
Begin
Readln (a, b,c );
If a<0 then write (“треугольник не
существует');
If a*a + b*b = c*c then writeln
(“треугольник прямоугольный')
else writeln (“не прямоугольный');
End.
Что выведет программа, если
a=5,b=3,c=4?​

Answer 1

Відповідь:

Пояснення:

Если a=5,b=3,c=4, то программа выведет:

НЕ ПРЯМОУГОЛЬНЫЙ