uses crt;vart1:boolean;a, b, c: integer;beginreadln(a, b, c);if c*c=a*a+b*b then t1:= true else t1:= false;writeln (t1);readkey;end.
uses crt;
var
t1:boolean;
a, b, c: integer;
begin
readln(a, b, c);
if c*c=a*a+b*b then t1:= true else t1:= false;
writeln (t1);
readkey;
end.