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

Даны целые числа a, b, c, являющиеся сторонами некоторого треугольника.

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

автор: Sklyarov Sergej a.k.a. S9