大师作文网懂VB的好心人帮我做到题
来源：学生作业帮 编辑：大师作文网作业帮 分类：数学作业 时间：2024/11/20 12:04:51
懂VB的好心人帮我做到题
二分微分：“一尺之棰,日取其半,万世不竭”是我国古书中最早体现微积分思想的一段记载.模拟此意的数学表达式为：
对以下问题画出流程图,写出代码:
①求前10项的和 (用计数循环方式解题)
②多少项后累加和s超过0.99999 (用当型循环和直到型循环两种不同方式分别解题)
二分微分：“一尺之棰,日取其半,万世不竭”是我国古书中最早体现微积分思想的一段记载.模拟此意的数学表达式为：
对以下问题画出流程图,写出代码:
①求前10项的和 (用计数循环方式解题)
②多少项后累加和s超过0.99999 (用当型循环和直到型循环两种不同方式分别解题)
1
Private Sub Form_Click()
Dim i, s
For i = 1 To 10
s = s + Val(InputBox("num="))
Next i
Print s
End Sub
2
Private Sub Form_Click()
Dim i, s
s = 0
Do While (s 0.99999)
Print s
End Su
Private Sub Form_Click()
Dim i, s
For i = 1 To 10
s = s + Val(InputBox("num="))
Next i
Print s
End Sub
2
Private Sub Form_Click()
Dim i, s
s = 0
Do While (s 0.99999)
Print s
End Su