Заданы стороны треугольника a b c . Определить , является ли он равносторонним. Написать программу на языке паскаль

Question

Заданы стороны треугольника a b c . Определить , является ли он равносторонним. Написать программу на языке паскаль

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a,b,c:integer; begin writeln('Введите стороны треугольника: '); readln(a,b,c); if (a = b) and (b = c) then writeln('Равносторонний'); else writeln('Неравносторонний'); readln end.