2022年數(shù)值分析5-用Jacobi迭代法和Gauss-Seidel迭代法求解線性方程組_第1頁
2022年數(shù)值分析5-用Jacobi迭代法和Gauss-Seidel迭代法求解線性方程組_第2頁
2022年數(shù)值分析5-用Jacobi迭代法和Gauss-Seidel迭代法求解線性方程組_第3頁
2022年數(shù)值分析5-用Jacobi迭代法和Gauss-Seidel迭代法求解線性方程組_第4頁
2022年數(shù)值分析5-用Jacobi迭代法和Gauss-Seidel迭代法求解線性方程組_第5頁
已閱讀5頁,還剩2頁未讀, 繼續(xù)免費閱讀

下載本文檔

版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領

文檔簡介

1、精品資料歡迎下載作業(yè)六:分別編寫用 jacobi迭代法和 gauss-seidel迭代法求解線性方程組 ax=b的標準程序,并求以下方程組的解;可取初始向量x0 =0, 0,0;迭代終止條件 |x k+1-xk|<=10e-6( 1)=( 2)=jacobi迭代法:流程圖開頭判定 b 中的最大值有沒有比誤差大給 x 賦初值進行迭代求出 x,弱到 100 次仍沒到,警告不收斂終止程序clear;clc;a=8,-1,1;2,10,01;1,1,-5; b=1;4;3;e=1e-6; x0=0;0;0'n=lengtha; x=zerosn,1; k=0;r=maxabsb; whi

2、le r>efor i=1:nd=ai,i;if absd<ewarning' 矩陣 a 輸入有誤 ' return;end sum=0; for j=1:nif j=isum=sum+ai,j*x0j;endendx1i=bi-sum/ai,i;endk=k+1; r=maxabsx1-x0; x0=x1;fprintf' 第%d 次迭代: ',kfprintf'n與上次運算結果的距離:%f n',r dispx1;if k>100warning' 不收斂 'endendx=x0;程序結果( 1)( 2)gau

3、ss-seidel迭代法:程序clear;clc;%a=8,-1,1;2,10,01;1,1,-5;%b=1;4;3;a=5,2,1;-1,4,2;2,-3,10; b=-12;20;3;m=sizea;if m1=m2error' 矩陣 a 不是方陣 'end n=lengthb;%初始化 n=0;%迭代次數(shù)l=zerosn;%分解 a=d+l+u,d是對角陣, l 是下三角陣, u 是上三角陣u=zerosn;d=zerosn;g=zerosn;%g=-invd+l*u d=zerosn,1;%d=invd+l*b x=zerosn,1;for i=1:n% 初始化 l 和 ufor j=1:nif i<jendendend if i>jendli,j=ai,j;ui,j=ai,j;for i=1:n% 初始化 d di,i=ai,i;endg=-invd+l*u;%初始化 g d=d+lb;%初始化 d%迭代開頭x1=x; x2=g*x+d;while normx2-x1,i

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
  • 4. 未經權益所有人同意不得將文件中的內容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網僅提供信息存儲空間,僅對用戶上傳內容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
  • 6. 下載文件中如有侵權或不適當內容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

評論

0/150

提交評論