Треугольник со сторонами a, b, c является равнобедренным

Равнобедренный треугольник — треугольник, у которого две стороны равны. Значит нам нужно попарно сравнить длины его сторон и если какая-то пара будет равно, значит треугольник равнобедренный. Напишем программу:

program u_3;
var a,b,c:real;
begin
write('Введите стороны треугольника через пробел: ');
read(a, b, c);
if ((a=b) or (b=c) or (a=c)) then write('Треугольник равнобедренный')
  else write('Треугольник неравнобедренный');
end.