> 其他 >
VB编程题:求自然对数e的近似值
e=1+1/1!+1/2!+1/3!+……+1+50!
人气:211 ℃ 时间:2020-05-12 14:44:57
解答
Private Sub Form_Load()
For i = 1 To 50
n = 1
For j = 2 To i
n = n * j
Next
s = s + 1 / n
Next
MsgBox s
End Sub
推荐
猜你喜欢
© 2024 79432.Com All Rights Reserved.
电脑版|手机版