do input""a,b i=pi/2 f=0^a for u=2to a/b*99step 2f=i+f i=i*(u-4+3/u)/u*(1-(b/a)^2)next ?int(f*a*4+.5)loop