Question

Заданы длины сторон треугольника ,определить, является ли этот треугольник равнобедренным. Pascal

Answer 1

var

  a, b, c : real;

begin

  read (a, b, c);

  if (a = b) or (b = c) or (a = c) then writeln ('Yes') else writeln ('No');

end.