作业帮 > 数学 > 作业

VB利用级数求和法计算,Xn=1+2/x^2+3/x^3+...+n/x^n,x>1,精度要求为10^-5

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/05/07 09:22:14
VB利用级数求和法计算,Xn=1+2/x^2+3/x^3+...+n/x^n,x>1,精度要求为10^-5
x是自己任意取的吗?
'x取值大于1,可以任意取,给你写个x=2的实例:
Private Sub Form_Load()
Dim x,n,s,sum
x = 2 '假设x=2,自己修改
sum = 1:n = 1
Do
n = n + 1
s = n / x ^ n
If s
再问: 不对呀 这个做出来的精度不对
再答: x取值对吗?我这里的x为2
再问: 它保留的位数不对
再答: '位数可以随便定义 Private Sub Form_Load() Dim x, n, s, sum, pos pos = 5 '保留5位小数,自己修改 x = 3 '假设x=2,自己修改 sum = 1: n = 1 Do n = n + 1 s = n / x ^ n If s