vb简单编程:求自然对数e的近似值,当任意项的值小于10^(-4)是结束运算.用公式e=1+1/1!+1/2!+1/n
Private Sub Command1_Click()
Dim a#,s#,e%
a = 1
s = 1
Do
s = s * a
t = 1 / s
e = e + t
a = a + 1
Loop While s > 10000
Print "e="; e
End Sub
错在哪?求分析错误程序
人气:267 ℃ 时间:2020-01-27 08:36:23
解答
Dim a As DoubleDim s As DoubleDim e As SingleDim t As Singlea = 1s = 1e = 1Do While 1 / s >= 10 ^ (-0.4) s = s * a t = 1 / s e = e + t a = a + 1LoopPrint "e="; e
推荐
- VB编程题:求自然对数e的近似值
- 编程计算自然对数 e 的近似值,要求计算的误差小于0.000001 ,计算自然对数e的公式为e=1+1/1!+1/2!+1/3!+
- C语言编程:利用下面公式,求自然对数e的近似值 e=1+1/1!+1/2!+1/3!+.
- vb编程:自然对数的底数e的值可由如下无穷级数计算:e=1+1/1!+1/2!+……+1/n!
- C语言,编写程序,根据近似公式e≈1+1/(1!)+1/(2!)+1/(3!)+…+1/(n!)计算e的近似值,要求直至最后一项的值小于10的负七次方为止
- 对于特殊的因数 兀 与数字相乘时()放在数字()与字母或括号相乘时,省略括号,放在字母或括号的()
- 在()里填上适当的运算符号.使算式成立 12()6()3=4()4
- 高度每增加1000米气温下降6度,现地面温度是25度,则x米高空气温约是多少?
猜你喜欢