dim a(1e5) for i=0to 1e5s=s+(-1)^i/(2*i+1) a(i)=s next input""n for i=1to n input""m ?a(m-1)using"%.15g"next