VB编程一道题
答案:1 悬赏:30 手机版
解决时间 2021-07-30 05:45
- 提问者网友：温旧梦泪无声
- 2021-07-29 14:54
求1-1/2+1/3-...1/n 的值,直到最后一项绝对值小于0.000001为止
最佳答案
- 五星知识达人网友：拾荒鲤
- 2021-07-29 16:27
没开VB，直接手打的，有错再问。
s = 0
f = 1
n = 1
Do
s = s + f / n
f = -f
n = n + 1
Loop While 1 / n < 0.000001
Msgbox s
s = 0
f = 1
n = 1
Do
s = s + f / n
f = -f
n = n + 1
Loop While 1 / n < 0.000001
Msgbox s
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯