for i=1 to 200 step 2 a=i*(-1)^(i+1) b=b+1/anext iprint b调试过了~~
For i = 1 To 199 Step 4 Pi = Pi + 1 / iNext iFor j = 3 To 197 Step 4 Pi = Pi - 1 / iNext jPi = Pi * 4MsgBox Pi