составить алгоритм ,с помощью которого можно определить ,является ли треугольник с заданными сторонами a,b,c равносторонним ,равнобедренным или прямоугольным

Есть ответ
17.12.2022
285

Ответ


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.

  


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.