模型制作视频:求VBScript计算圆周率的代码

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/05 19:10:12
求VBScript计算圆周率的代码

就是不停的计算圆周率,越算数位越多.....

希望加上注释。。。

Msgbox PI(100000)

Function PI(n)
sum=0 '累加器
For i=1 To n
sum=sum+(-1)^(i-1)/(2*i-1) ’级数公式
Next
PI=4*sum '返回值
End Function

很抱歉帮不了你,我学的是pascal语言的,挺老的