问题标题：
懂VB的好心人帮我做到题二分微分：“一尺之棰,日取其半,万世不竭”是我国古书中最早体现微积分思想的一段记载.模拟此意的数学表达式为：对以下问题画出流程图,写出代码:①求前10项的
问题描述：
懂VB的好心人帮我做到题
二分微分：“一尺之棰,日取其半,万世不竭”是我国古书中最早体现微积分思想的一段记载.模拟此意的数学表达式为：
对以下问题画出流程图,写出代码:
①求前10项的和(用计数循环方式解题)
②多少项后累加和s超过0.99999(用当型循环和直到型循环两种不同方式分别解题)
范欣然回答：
1
PrivateSubForm_Click()
Dimi,s
Fori=1To10
s=s+Val(InputBox("num="))
Nexti
Prints
EndSub
2
PrivateSubForm_Click()
Dimi,s
s=0
DoWhile(s0.99999)
Prints
EndSub
点击显示
数学推荐
热门数学推荐