數(shù)值分析-迭代法-全文預(yù)覽
【正文】 指導(dǎo)教師 成績（優(yōu)、良、中、及格、不及格） 華 北 科 技 學(xué) 院 基 礎(chǔ) 部實驗六 解線性方程組的迭代法：1） 熟悉求解線性方程組的有關(guān)理論哈方法。2．雅可比迭代法算法設(shè)方程組AX=b的系數(shù)矩陣的對角元素M為迭代次數(shù)容許的最大值,為容許誤差.① 取初始向量令k=0。 double epsilon。 for(i=0。 epsilon=0。 for(j=0。 } y[i]=(a[i][n]s)/a[i][i]。 } for(i=0。 float a[9][10]={{31,13,0,0,0,10,0,0,0,15}, {13,35,9,0,11,0,0,0,0,27}, {0,9,31,10,0,0,0,0,0,23}, {0,0,10,79,30,0,0,0,9,0}, {0,0,0,30,57,7,0,5,0,20}, {0,0,0,0,7,47,30,0,0,12}, {0,0,0,0,0,30,41,0,0,7}, {0,0,0,0,5,0,0,27,2,7}, {0,0,0,0,0,0,0,2,29,10}}。 x=Jacobi(a,9)。 }程序運行結(jié)果如下：結(jié)果為：x[0]=x[1]=x[2]=x[3]=x[4]=x[5]=x[6]=x[7]=x[8]=Press any key to continue：include includeincludeincludeinclude iostreamincludedefine N 100void main(){ int i。 x=GauseSeide(c,9)。}float *GauseSeide(float *a,int n){ int i,j,nu=0。i=n1。i++) { d=。 d=d*(a+i*(n+1)+i)*x[i]。 } if(nu=N) { printf(迭代發(fā)散\n)。 }
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1