составить алгоритм ,с помощью которого можно определить ,является ли треугольник с заданными сторонами a,b,c равносторонним ,равнобедренным или прямоугольным
var
a, b, c : real;
begin
read (a, b, c);
if (a = b) and (b = c) then writeln (Равносторонний)
else if (a = b) or (a = c) or (b = c) then writeln (Равнобедренный)
else if (sqr (a) + sqr (b) = sqr (c)) or (sqr (b) + sqr (c) = sqr (a)) or (sqr (a) + sqr (c) = sqr (b)) then writeln (Прямоугольный)
else writeln (No);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
