Bankers rounding by *yuko*

do1;read*,x;n=mod(x,2.)>.5;n=x+n*.5;1 print'(i0)',n;end

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page