Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

Алгоритм на языке Pascal (если надо на алгоритмическом языке, скажите в комментариях)
//Pascal
var a,b,c:real;
begin
 repeat
  writeln(Введите стороны треугольника);
  readln(a,b,c);
  //Проверка, что такой треугольник существует
  //Если да то идем дальше. Иначе еще раз вводим длины сторон
  until  (a>0) and (b>0) and  (c>0) and (a+b>c);
if (a=b) and (b=c) then writeln(Равносторонний)
else
  writeln(Не равносторонний);
end.