1 read*,a,b;c=a+b;n=a/b>9;print'(i0)',nint(3.1416*(c+3*(a-b)**2/(10*c+(c*c+12*a*b)**.5))+n*a/b/145);goto1;end
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page