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

Program Boolean32;

Var
  a, b, c: Integer;

Begin
  ReadLn(a, b, c); { здесь c - гипотенуза }
  WriteLn(Sqr(a) + Sqr(b) = Sqr(c));

end.