|
|
back to boardwhy CRASH Posted by Oleg 20 Nov 2002 13:14 const eps=0.000001; var j:real; i,n:longint; r:real; begin read(n); for i:=1 to n do begin read(j); r:=sqrt(-7+8*j); r:=round(r)-r; if abs(r)<eps then write('1 ') else write('0 '); end; end. AC Posted by Oleg 20 Nov 2002 16:17 Re: why CRASH Posted by Oleg Sh 24 Aug 2005 16:18 Use i:real; ILI U menja prokatila? if undestand :) |
|
|