program Zada4a_8; {$APPTYPE CONSOLE} var a,b,c:real; begin write('a=');readln(a); write('b=');readln(b); write('c=');readln(c); if SQR(a)+SQR(b)=SQR(c) then write('correct') else write('wrong'); readln; end.