利用while,for,do-while循环语句计算求和问题：S=1-1/2+1/3-1/4+……1/999-1/100
利用while,for,do-while循环语句计算求和问题：S=1-1/2+1/3-1/4+……1/999-1/1000
赞 jxjaouyong 花朵
共回答了14个问题采纳率：100% 举报
在excel 中用vba 输入以下代码即可：（vb中也可以）
Sub aaa()
Dim s,i,k,m
For i = 1 To 1000
If i Mod 2 = 0 Then
k = 0 - i
Else
k = i
End If
s = s + 1 / k
Next
MsgBox Format(s,"0.00")
End Su
Sub aaa()
Dim s,i,k,m
For i = 1 To 1000
If i Mod 2 = 0 Then
k = 0 - i
Else
k = i
End If
s = s + 1 / k
Next
MsgBox Format(s,"0.00")
End Su
1年前
2
可能相似的问题
-
利用for循环语句计算1+1 /2+1/4+1/6+.+1/50
1年前1个回答
-
1年前1个回答
-
1年前1个回答
-
1年前1个回答