二线性方程组解法new.docVIP

MACROBUTTON MTEditEquationSection2 SEQ MTEqn \r \h \* MERGEFORMAT SEQ MTSec \r 1 \h \* MERGEFORMAT SEQ MTChap \r 1 \h \* MERGEFORMAT 第二章 线性方程组的解法 基本解法迭代法和直接法。 直接方法大家已学过，我们重在分析程序写法。 §1 雅可比（Jacobi）迭代法 例： 求解线性方程组 分离出、、，构造迭代 取初值 得到近似解 准确解为 思路和方程迭代解法一样 极限存在 极限为根 线性方程组 矩阵 当 极限存在就是方程组的解， 本方法也适用于非线性方程组 迭代 极限存在 极限即为解 程序思想： 定义数组 A（n,n） X0(n) X(n) B(n) 读入组数 A B X0 (初值) Do 100 k=1,10 Do 200 i=1,n 三重循环 200 CONTINUE DO 300 i=1，n 300 X0（i）=X(i) 100 WRITE（*，*）X Stop End §2 高斯-塞德尔（Gauss-Seidel）迭代法 对雅可尔迭代稍加改进 就可得到更有效的计算公