【H2O】计算π的电脑程序代码【BASIC】

花了一刻钟才算完执行了一百万次运算
代码如下：
CLS
A = 1
FOR N = 1 TO 1000000 STEP 1
A = A + ((-1) ^ N / (2 * N + 1))
PRINT A,
NEXT N
A = A * 4
PRINT
PRINT "******************************************************************"
PRINT
PRINT A
END
图等会传