列主元消去法（Elimination by column principal component）.docVIP

列主元消去法（Elimination by column principal component） / / 解线性方程组 / / would jj, 2008 # iostream.h in # iomanip.h in # stdlib.h in # math.h in / / ---------------------------------------------- 全局变量定义区 const int number = 5; / / 方程最大个数 double [number] [number], b [number] copy _ and [number] [number] copy _ b [number]; / / 系数行列式 int and _ y [number]; / / [] [] 中随着横坐标增加列坐标的排列顺序, 如a [0] [0] and [1], [2] and [2] [1]...则a _ y [] = {}; 0,2,1... int lenth, copy _ lenth; / / 方程的个数 double and _ sum; / / 计算行列式的值 char * x; / / 未知量a, b, c的载体 / / ---------------------------------------------- 函数声明区 void input (); / / 输入方程组 void print _ menu (); / / 打印主菜单 int select (); / / 输入选择 void cramer (); / / cramer算法解方程组 void gauss _ row (); / / gauss列主元解方程组 void guass _ all (); / / gauss全主元解方程组 void doolittle (); / / 用doolittle算法解方程组 int doolittle _ check (double a [] [number], double b [number]); / / 判断是否行列式 0, 若是, 调整为顺序主子式全 0 void xiaoqu _ in _ l (); / / 将行列式doolittle分解 void calculate _ in _ l (); / / 计算doolittle结果 double calculate _ and (int n, int m); / / 计算行列式 double quanpailie _ and (); / / 根据列坐标的排列计算的值, 如a _ y [] = {0,2,1}, 得sum = a [0] [and _ y [0] and [1], [and _ y [1] and [2] [and _ y [2]] = a [0] [0] and [1] [2] * and [2] [1]; void exchange (int m, int i); / / 交换a _ y [m], and _ y [i] void exchange _ lie (int j); / / 交换a [] [j] 与b []; void exchange _ hang (int m, int n); / / 分别交换a [] [] [] 中的m与n两行 和b void gauss _ row _ xiaoqu (); / / gauss列主元消去法 void gauss _ all _ xiaoqu (); / / gauss全主元消去法 void calculate gauss _ (); / / 根据gauss消去法结果计算未知量的值 void exchange _ and _ lie (int m, int n); / / 交换a [] [] 中的m和n列 void exchange _ x (int m, int n); / / 交换x [] 中的x [m] 和x [n] void convert (); / / 恢复数据 / / 主函数 void main () { int flag = 1; input (); / / 输入方程 while (flag) { print _ menu (); / / 打印主菜单 flag = choose (); / / 选择解答方式 } } / / 函数定义区 void print () _ menu { system (cls); cout ------------ 方程系数和常数矩阵表示如下: \ n; for (int i = 0; j lenth; j + +) cout 系数 j + 1 ; cout \ t常数; cout