Проверить истинность высказывания: «Треугольник со сторонами a, b, c является равнобедренным» — Pascal(Паскаль)

Program Boolean31;

Var
  a, b, c: Integer;

Begin
  ReadLn(a, b, c);
  WriteLn((a = b) Or (b = c) Or (c = b));

end.