数值分析 五六章new

《数值分析 五六章new》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第五章追赶法求解线性方程组#include#includevoidmain(){   floata[3][3]={5,1,0,1,5,1,0,1,5},b[3]={17,14,7},x[3]={0},y[3]={0};   floattemp;   inti,j,k;   for(i=0;i<3;i++)   {   temp=0;   for(j=0,k=i+1;j

2、][k]/a[i][i];   }   y[0]=b[0]/a[0][0];   for(i=1;i<3;i++)   {   temp=0;   for(j=0;j

3、%10.5f

4、n",y[i]);   }   x[2]=y[2];   for(i=1;i>=0;i--)   {   temp=0;   for(j=2;j>i;j--)        temp+=x[j]*a[i][j];   x[i]=y[i]-temp;   }   printf("thearrayanswerisx[3]=[");   for(i=0;i<3;i++)   printf("%10.5f",x[i]);   printf("]");}第六章雅克比迭代法高斯—赛德尔#include#include#i

5、ncludeusingnamespacestd;#definekk50//定义最大方程元数#defineexp1e-5//定义结束门限值intn,ll,hh,i,j;doubleA[kk][kk],x[kk][kk],b[kk],y[kk],a[kk],z[kk],m,nn,d,e=1,w;voidmain(){cout<<"　　　********************************"<

6、<<"　　"<>n;cout<<"请输入方程系数矩阵:"<<"";for(i=0;i>A[i][j];cout<<"请输入右边向量:"<<"";for(i=0;i>b[i];//****

7、********************判断是否对角占优*************************for(i=0;id){cout<<"该方程不对角占优，迭代不收敛"<>hh;if(hh!=1)gotobb;elseexit(1);}}//**********************计算出迭代矩阵

8、*************************for(i=0;i

9、"";cout<