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

Предыдущий
вопрос Следующий
вопрос

program EquilateralTriangle;

var
a, b, c: integer;

begin
writeln('Enter the lengths of the sides of the triangle:');
readln(a, b, c);

if (a = b) and (b = c) then
writeln('The triangle is equilateral.')
else
writeln('The triangle is not equilateral.');
end.