a:=list s:=0 for(i,0,1e5,a push(s=s+(-1)**i/(2*i+1))) File standardInput readLines slice(1)map($,a at($asNumber-1)asString(0,15)rstrip("0")println)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page