文档介绍:数值分析实验报告(五)实验名称:解方穆纽的迭代法实验目的:运用雅可比法、高斯赛徳尔法求方程组的根分别用雅可比法、-11__8_210-:(1)雅可比法:#include<>#include<>#definem100#definen3#(floata[n][n],floatx[n],floatb[n]){boolisTrue;inti,j,k=O;floaty[n],t,d;for(i=0;i<n;i++){x[i]=;1while(l){d=;k++;for(i=0;i<n;i++)floats=;for(j=0;j<n;j++)if(j==i)continue;elses=s+a[i]Lj]*x[j];y[i]=(b[i]-s)/a[i][i];}t=fabs(x[i]-y[i]);if(d<t)for(intp=();pvn;p++){x[p]=y[p];}if(d<eps){isTrue=true;break;}if(k>m){isTrue=false;break;returnisTrue;}voidmain(){boolX;floata[n][n],x[n],b[n];cout«"输入系数矩阵a"«endl;for(inti=O;i<n;i++){for(intj=O;j<n;j++){cin»a[i][j];}cout«endl;}cout«M输入方程组右端系数矩阵bH«endl;for(i=0;i<n;i++)X=YKB(a,x,b);if(X==true){coutvv”用雅克比迭代法迭代的结果n«endl;for(inti=0;ivn;i++)cout«x[i]«endl;}elsecoutvv”该方稈听过雅克比迭代法迭代无解”vvendl;(2)高斯赛徳尔法:#include<>#include<>#definem100#definen3#defineepsO.()O(X)OIfloatGSS(floata[n][n],floatxfn],floatb[n|){boolisTrue;floattemp,t,d;inti,j,k=l;for(i=0;i<n;i++){x[i]=;}vvhile(l){d=0;k++;for(i=0;i<n;i++){floats=;tenip=x[i];for(j=0;j<n;j++){if(i==j)continue;elses=s+a[i][j]*xfj];x[i]=(b[i]-s)/a[i][i];t=fabs(x[ij-temp);if(d<t)d=t;}if(d<eps){isTrue=true;break;}if(k>m){isTrue=false;break;}}returnisTrue;}voidmain(){boolX;floa