函数过程和子过程

来源:百度知道 编辑:UC知道 时间:2024/05/26 09:42:42
VB编程
Public Sub newton(ByVal x0#, x#, ByVal eps#)
Dim fx#, f1x#
Do
fx = 3 * x0 * x0 * x0 - 4 * x0 * x0 - 5 * x0 + 13
f1x = 9 * x0 * x0 - 8 * x0 - 5
x = x0 - fx / f1x
If Abs(x - x0) < eps Then Exit Do
x0 = x
Loop
End Sub
函数过程和子过程怎么弄?

我是学过c语言的,vb还能看看懂,大概过程是这样的
|x-x0|的值大于 eps,也就是说你给定的数跟要求的差很大,就执行上面的
fx = 3 * x0 * x0 * x0 - 4 * x0 * x0 - 5 * x0 + 13
f1x = 9 * x0 * x0 - 8 * x0 - 5
x = x0 - fx / f1x
直到你给定的数跟要求的数满足要求时,就结束。