作业帮 > 综合 > 作业

0.219=x - 2 * x * x + 2 * x * x * Exp(-(1 / x)) 用牛顿迭代法把上面的式子

来源:学生作业帮 编辑:搜狗做题网作业帮 分类:综合作业 时间:2024/05/09 10:52:02
0.219=x - 2 * x * x + 2 * x * x * Exp(-(1 / x)) 用牛顿迭代法把上面的式子用VB编程出来,要代码就好
令y = x - 2 * x * x + 2 * x * x * Exp(-(1 / x))-0.219
'原函数
'一介导数
Y1 = 1 - 4 * x + 4 * x * Exp(-(1 / x)) + 2 * Exp(-(1 / x))
X1 = x - y / Y1
absolution = Abs(X1 - x),Do While absolution < 0.0000000001 '运算精度
x = X1
0.219=x - 2 * x * x + 2 * x * x * Exp(-(1 / x)) 用牛顿迭代法把上面的式子
X1 = 0.219
Do
x = X1
y = x - 2 * x * x + 2 * x * x * Exp(-(1 / x)) - 0.219
Y1 = 1 - 4 * x + 4 * x * Exp(-(1 / x)) + 2 * Exp(-(1 / x))
X1 = x - y / Y1
Loop While Abs(X1 - x) < 0.0000000001
Print X1