以下是引用multiple19O2在2007-9-22 10:01:20的发言:
不妨碍。
我感觉基本是一样的。没测试。
差很多,刚刚扫一眼也觉得几乎一样。。。可是把式子列出来,就会发现不仅起点的数字不一样。。。
偶学编程,也许本身就是一个错。。。
真对不起,那我把列题发上去,看能不能想到??
列:求下列表达式的值
1-1/2+1/3-1/4+....+(-1)^(n-1)*1/n
解答:
Private Sub Form_Click()
Dim i As Integer, y As Single, n As Integer, s As Single
n = InputBox("输入n值", "")
s = 1
For i = 2 To n
y = (-1) ^ (i - 1)
s = s + y / n
Next i
Print s
Private Sub Form_Click()
Dim i As Integer, y As Single, n As Integer, s As Single
n = InputBox("输入n值", "")
For i = 1 To n
y = (-1) ^ (i - 1)
s = s + y / n
Next i
Print s
两者为什么结果不同??
谢谢