Составьте алгоритм, с помощью которого можно определить, является ли треугольник с заданными длинами сторон a, b, c равносторонним
Program v; Var a,b,c: integer; Begin Read(a,b,c); If a=b then If b=c then writeln('a=b=c') Else writeln ('треугольник не равносторонний'); Reason; End.