VB:用π^2/6=1/1^2+1/2^2+……+1/n^2近似公式求π值,当1/n^2

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/29 01:12:40
VB:用π^2/6=1/1^2+1/2^2+……+1/n^2近似公式求π值,当1/n^2
x) sz>e8#}3[C}8#mC}# a9yqF/O|g5O?ti{'%ma~ ܓ``fY`K>Rt6T HAA(`i.(d(Ĉ̼b<zf& l m @~(

VB:用π^2/6=1/1^2+1/2^2+……+1/n^2近似公式求π值,当1/n^2
VB:用π^2/6=1/1^2+1/2^2+……+1/n^2近似公式求π值,当1/n^2

VB:用π^2/6=1/1^2+1/2^2+……+1/n^2近似公式求π值,当1/n^2
n = 1
s = 0
Do
n = n + 1
x = 1 / n ^ 2
s = s + x
Loop Until x < 0.00001
Print s, n
s=0.6417 n=317