懂VB的好心人帮我做到题

问题描述:

懂VB的好心人帮我做到题
二分微分:“一尺之棰,日取其半,万世不竭”是我国古书中最早体现微积分思想的一段记载.模拟此意的数学表达式为:
对以下问题画出流程图,写出代码:
①求前10项的和 (用计数循环方式解题)
②多少项后累加和s超过0.99999 (用当型循环和直到型循环两种不同方式分别解题)
1个回答 分类:数学 2014-12-13

问题解答:

我来补答
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
 
 
展开全文阅读
剩余:2000
下一页:生物 酶