Why i get WA on test 5? This is my solution

Why i get WA on test 5? This is my solution:

var r,sum,n:extended;

begin

readln(input,r);

sum:=4*sqr(r);

n:=int((sqrt(2)-1)*r/sqrt(2));

write(output,(sum-2*n*(n+1)):0:0);

end.

*Edited by author 24.05.2007 21:21*

Re: Why i get WA on test 5? This is my solution

[sorry man]

*Edited by author 04.11.2007 00:27*

*Edited by author 04.11.2007 00:27*

Re: Why i get WA on test 5? This is my solution

Buy Iphone!

Re: Why i get WA on test 5? This is my solution

Posted by

MadBit 12 Jan 2008 18:15

Fuck you!

Re: Why i get WA on test 5? This is my solution

Posted by

MadBit 12 Jan 2008 18:16

You are TEAPOT!!!!!!!!!!!!!!!!!!!!!!