Составьте алгоритм и программу на языке Паскаль, с помощью которого можно определить, является ли треугольник с заданными сторонами a, b, c равносторонним.
var
a,b,c:integer;
begin
writeln('введите стороны угла');
realn(a,b,c)
if (a=b) and (b=c) then
writeln('прямоугольник равносторонний')
else
writeln('прямоугольник не равносторонний')
end.