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)