作业帮 > 数学 > 作业

用vb do while 语句编写.已知π/4=1-1/3+1/5-1/7+1/9-1/11.,求计算十万次后的结果

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/07/19 00:12:15
用vb do while 语句编写.已知π/4=1-1/3+1/5-1/7+1/9-1/11.,求计算十万次后的结果
用vb的循环do while结构,怎么写?
Private Sub Command1_Click()
  Dim pi As Double, t As Double, i As Long
  t = 1: i = 1
  Do
    pi = pi + t / i
    t = -t
    i = i + 2
  Loop Until i > 200000
  Print "π≈"; 4 * pi
End Sub

再问: 那么请问当型循环怎么改?