库里炸裂海报:如何用vb语言求极限
来源:百度文库 编辑:杭州交通信息网 时间:2024/05/10 07:46:18
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
杭州交通信息网是一部内容开放、自由的互动网络百科全书
客观、专业、权威的知识性百科全书
来源:百度文库 编辑:杭州交通信息网 时间:2024/05/10 07:46:18
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