vb程序编码,计算表达式s=-x+2x^2/3!-4x^4/5!+6x^8/7!-…,x属于[1,2],要求计算精度为第n项的值小于10^(-5)
来源:学生作业帮助网 编辑:作业帮 时间:2024/05/11 21:21:29
vb程序编码,计算表达式s=-x+2x^2/3!-4x^4/5!+6x^8/7!-…,x属于[1,2],要求计算精度为第n项的值小于10^(-5)
vb程序编码,
计算表达式s=-x+2x^2/3!-4x^4/5!+6x^8/7!-…,x属于[1,2],要求计算精度为第n项的值小于10^(-5)
vb程序编码,计算表达式s=-x+2x^2/3!-4x^4/5!+6x^8/7!-…,x属于[1,2],要求计算精度为第n项的值小于10^(-5)
Dim s As Double, x As Single, t As Double, n As Integer, m As Integer, fact As Double
x = Rnd + 1
n = 2
s = -x
Do
m = 2 ^ (n - 1)
fact = 1
For i = 1 To 2 * n - 1
fact = fact * i
Next i
t = (-1) ^ n * (2 * n - 2) * x ^ m / fact
s = s + t
If (2 * n - 2) * x ^ m / fact < 10 ^ (-5) Then Exit Do
n = n + 1
Loop
Print "当最后一项等于" & (2 * n - 2) * x ^ m / fact & "时," & "s" & " = " & s
编码大概这样写,但是由于数值太大,会提示溢出错误.VB中没有提供可以存储这么大数的数值类型.