Question

С клавиатуры вводятся стороны треугольника, вычислить тип треугольника. Треугольник является разносторонним, если все его стороны имеют разную длину; треугольник будет равнобедренным, если любые две его стороны равны между собой, но отличны от третьей; и треугольник является равносторонним, когда все его стороны равны ​

Answer 1

var a, b, c: integer;

begin

 readln(a, b, c);

 if (a = b) and (b = c) then

   writeln('равносторонний')

 else if (a = b) or (b = c) or (a = c) then

   writeln('равнобедренный')

 else

   writeln('разносторонний');

end.