55问答网
所有问题
编程题:用π/4≈1-1/3+1/5-1/7+……公式求π的近似值,直到最后一项绝对值小于10^-6为止 do_while 循环
如题所述
举报该问题
推荐答案 2016-11-07
Private Sub Command1_Click()
Dim sign As Integer, a As Long, pi As Double
Dim i As Integer
sign = -1
i = 1
Do
a = 2 * i - 1
sign = -1 * sign
pi = pi + (1 / a) * sign
i = i + 1
Loop While Abs((1 / a) * sign) > 0.0001
pi = pi * 4
Print pi
End Sub
追问
C语言
温馨提示:答案为网友推荐,仅供参考
当前网址:
http://55.wendadaohang.com/zd/IQLRILeGILeQFcI8G44.html
相似回答
大家正在搜
相关问题
编程计算e的近似值,直到最后一项的绝对值小于10^-5时为止...
编写程序用下面公式求π的近似值 π/4 ≈ 1- 1/3+1...
C语言小白求助:用π/4≈1-1/3+1/5-1/7+。。。...
用π/4≈1-1/3+1/5-1/7+......公式求π的...
C语言解答:利用公式:π/4=1-1/3+1/5-1/7+…...
c++编程中。用π/4≈1-1/3+1/5-1/7+。。。。...
用公式 π/4 = 1-1/3+1/5-1/7……,编程序求...