Private Sub Command1_Click()
'10^(-4)=1/10000
For i = 1 To 9999 Step 3
a = 1 / i
Sum = Sum + a
Next i
Print Sum
End Sub
VB编程计算s=1+1/2+1/4+1/7+1/11+1/16+1/22+1/29+...,当第i项的值<10的-4次方时结束
VB编程计算s=1+1/2+1/4+1/7+1/11+1/16+1/22+1/29+...,当第i项的值<10的-4次方时结束
十分感谢啦!,很着急,谢谢帮忙啊~~
十分感谢啦!,很着急,谢谢帮忙啊~~
其他人气:801 ℃时间:2019-12-01 08:34:41
优质解答
我来回答
类似推荐
猜你喜欢
- 1“她今天没有来上班” 翻译成英语是什么?
- 2等底等高的圆柱和圆锥的体积相差16立方厘米,圆柱的体积是24立方厘米,圆锥的体积是8立方厘米.
- 3因式分解:16a的平方b的四次方c的六次方-25
- 4用月来表达的情感和作者写作时的处境有什么关系
- 5表现人美好品质的四字词语有哪些
- 6爸爸和小军分吃蛋糕,小军吃了它的七分之三,爸爸吃了它的七分之四,小军吃的是爸爸的( ).
- 7适当形式填空 My mother is not( )today.She‘ll be ( )tomorrow .(well)
- 8四位数7□4□能被55整除,求出所有这样的四位数?
- 9在锐角三角形abc中,已知 ab=5,ac=6 .o为三角形外接圆的圆心,若三角形abc的面积等于
- 10王村开凿了一个能融水1884立方米的圆柱体水池.水池的底面半径是20米,水池深多少米?