下面的程序是利用公式:π=4-4/3+4/5-4/7+4/9-4/11+…计算,π的近似值 Pvivate Sub Command1_Click() Dim PI As Double,x As Double,k As Long,si

admin2020-01-02  25

问题 下面的程序是利用公式:π=4-4/3+4/5-4/7+4/9-4/11+…计算,π的近似值
    Pvivate Sub Command1_Click()
        Dim PI As Double,x As Double,k As Long,sign As Integer
        sign=1
        k=1
        PI=0
        Do
          x=sign*4/(2*k-1)
                PI=PI+x
                k=k+1
                sign=_______
        Loop Until Abs(x)<0.000001
        Print PI
    End Sub
在空处应填写的是(    )。

选项 A、sign+1
B、-sign
C、x
D、k

答案B

解析 根据公式π=4-4/3+4/5-4/7+4/9-4/11+…可知sign是作为符号翻转的,即一次“+”,下一次就为“-”,因此空缺处应该填-sign,这样就可使符号循环一次翻转一次。
转载请注明原文地址:https://kaotiyun.com/show/ZnTp777K
0

最新回复(0)