99问答网
所有问题
编vb程序计算s=1-1/2+1/3-1/4+.......+(-1)^(n-1)*1/n
s精确到0.0001
举报该问题
其他回答
第1个回答 2008-06-08
有很多人问,真的,你可以自己搜索一下。看看,自己修改一下。
第2个回答 2008-06-08
Private Sub Command1_Click()
Dim S As Single
Dim N As Integer
N = Val(Text1)
For i = 1 To N
S = S + (-1) ^ (N - 1) * 1 / N
Next
Print "S = "; S
End Sub本回答被提问者采纳
相似回答
大家正在搜
相关问题
用VB编程计算 s=1-1/2+1/3-1/4+.....+...
vb试题编程计算1-1/2+1/3-1/4+...+1/99...
编程求s=1-1/2+1/3-1/4+...-1/100的值
编写一个vb程序,求 1+1/2+1/3+1/4+……+1/...
编写vb程序:s=1+1/2+2/3+3/5+… (30项)
VB题目s=1-1/2!+1/3!-1/4!+...-1/n...
用VB编程计算 s=1-1/2+1/3-1/4+.....+...
vb程序里计算1/1!+1/2!+1/3!+1/4!+......