文档介绍：迭代一、描述?叠代是数值分析中通过从一个初始估计出发寻找一系列近似解来解决问题(一般是解方程或者方程组)的过程,为实现这一过程所使用的方法统称为叠代法(IterativeMethod)一、描述?跟叠代法相对应的是直接法(或者称为一次解法),即一次性解决问题,例如通过开方解决方程x2 = 4。一般如果可能,直接解法总是优先考虑的。但当遇到复杂问题时,特别是在未知量很多,方程为非线性时,我们无法找到直接解法(例如五次以及更高次的代数方程没有解析解),这时候或许可以通过叠代法寻求方程(组)的近似解。二、直接解法?maxima?find_root(cos(x)-x^3, x, -1, 1);三、牛顿叠代法????nnnnxfxfxx'1????使用函数f(x)的泰勒级数的前面几项来寻找方程f(x) = 0的根?f(x)=f(x0)+f'(x0)*(x-x0)+…?取前两项得x=x0-f(x0)/f'(x0)??迭代三、牛顿叠代法第一个例子?求方程f(x) = cos(x) ? x3的根.?f '(x) = ?sin(x) ? 3x2?=! f(x)=cos(x)-x**3! 初始值x= main implicit nonereal::x,yreal::funinteger::i print*,"输入x=?" read*,x do i=1,10 y=fun(x)? x=y print*,i,y end do read (*,*) xend program mainreal function fun(x)? implicit nonereal::x fun=x-(cos(x)-x**3)/(-sin(x)-3*x*x)? returnend function fun例子2:求a的m次方根?設f(x) = xm?a,f'(x) = mxm? 1?而a的m次方根,亦是x的解,?以牛頓法來迭代:real function fun(x)? implicit nonereal::x,ainteger::m a= m=3 fun=x-x/m*(1-a/x**m)? returnend function fun四、二元二次迭代?????????nnnnnbxyyaxx1211?????yxba