下面的程序是利用公式:π=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 I

admin2018-12-20  14

问题 下面的程序是利用公式:π=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 Unti1 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://jikaoti.com/ti/OAm0FFFM
0

最新回复(0)