库里炸裂海报:如何用vb语言求极限
来源:百度文库 编辑:杭州交通信息网 时间:2024/05/21 00:50:06
1+ 1/2 + 1/3 +1/4 +。。。。。。。。。+1/100=?
用vb做:
Private Sub Command1_Click()
For k = 1 To 100
i = i + 1 / k
Next k
Print i
End Sub
得:5.18737751763962
1+ 1/2 + 1/3 +1/4 +。。。。。。。。。+1/100=?
用vb做:
Private Sub Command1_Click()
For k = 1 To 100
i = i + 1 / k
Next k
Print i
End Sub
得:5.18737751763962