版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
PAGEPAGE5第二步:求L和U矩陣的逆,(1)求U矩陣的逆由式(9)可得矩陣U的逆的各元素計(jì)算如下:(2)求L矩陣的逆由(8)式可得L矩陣的逆的各元素計(jì)算如下所以得到L和U的逆矩陣為:(3)求A的逆矩陣由式(10)可計(jì)算得到矩陣A的逆,如下:由程序計(jì)算出的結(jié)果如下:2、C語(yǔ)言程序設(shè)計(jì)及測(cè)試2.1算法c程序?qū)崿F(xiàn)#include<stdio.h>#include<string.h>#defineN4voidmain(){floata[N][N];floatL[N][N],U[N][N],out[N][N],out1[N][N];floatr[N][N],u[N][N];memset(a,0,sizeof(a));memset(L,0,sizeof(L));memset(U,0,sizeof(U));memset(r,0,sizeof(r));memset(u,0,sizeof(u));intn=N;intk,i,j;intflag=1;floats,t;////////////////////inputamatrix////printf("\ninputA=");for(i=0;i<n;i++)for(j=0;j<n;j++)scanf("%f",&a[i][j]);//////////////////figuretheinputmatrix//////////////////////////printf("輸入矩陣:\n");for(i=0;i<n;i++){ for(j=0;j<n;j++) { printf("%lf",a[i][j]); } printf("\n");}for(j=0;j<n;j++)a[0][j]=a[0][j];//計(jì)算U矩陣的第一行for(i=1;i<n;i++)a[i][0]=a[i][0]/a[0][0];//計(jì)算L矩陣的第1列for(k=1;k<n;k++){for(j=k;j<n;j++){s=0;for(i=0;i<k;i++)s=s+a[k][i]*a[i][j];//累加a[k][j]=a[k][j]-s;//計(jì)算U矩陣的其他元素}for(i=k+1;i<n;i++){t=0;for(j=0;j<k;j++)t=t+a[i][j]*a[j][k];//累加a[i][k]=(a[i][k]-t)/a[k][k];//計(jì)算L矩陣的其他元素}}for(i=0;i<n;i++)for(j=0;j<n;j++){if(i>j){L[i][j]=a[i][j];U[i][j]=0;}//如果i>j,說(shuō)明行大于列,計(jì)算矩陣的下三角部分,得出L的值,U的//為0else{U[i][j]=a[i][j];if(i==j)L[i][j]=1;//否則如果i<j,說(shuō)明行小于列,計(jì)算矩陣的上三角部分,得出U的//值,L的為0elseL[i][j]=0;}}if(U[1][1]*U[2][2]*U[3][3]*U[4][4]==0){ flag=0;printf("\n逆矩陣不存在");}if(flag==1){/////////////////////求L和U矩陣的逆for(i=0;i<n;i++)/*求矩陣U的逆*/{u[i][i]=1/U[i][i];//對(duì)角元素的值,直接取倒數(shù)for(k=i-1;k>=0;k--){s=0;for(j=k+1;j<=i;j++)s=s+U[k][j]*u[j][i];u[k][i]=-s/U[k][k];//迭代計(jì)算,按列倒序依次得到每一個(gè)值,}}for(i=0;i<n;i++)//求矩陣L的逆{r[i][i]=1;//對(duì)角元素的值,直接取倒數(shù),這里為1for(k=i+1;k<n;k++){for(j=i;j<=k-1;j++)r[k][i]=r[k][i]-L[k][j]*r[j][i];//迭代計(jì)算,按列順序依次得到每一個(gè)值}}/////////////////繪制矩陣LU分解后的L和U矩陣///////////////////////printf("\nLU分解后L矩陣:");for(i=0;i<n;i++){printf("\n");for(j=0;j<n;j++)printf("%lf",L[i][j]);}printf("\nLU分解后U矩陣:");for(i=0;i<n;i++){printf("\n");for(j=0;j<n;j++)printf("%lf",U[i][j]);}printf("\n");////////繪制L和U矩陣的逆矩陣printf("\nL矩陣的逆矩陣:");for(i=0;i<n;i++){printf("\n");for(j=0;j<n;j++)printf("%lf",r[i][j]);}printf("\nU矩陣的逆矩陣:");for(i=0;i<n;i++){printf("\n");for(j=0;j<n;j++)printf("%lf",u[i][j]);}printf("\n");//驗(yàn)證將L和U相乘,得到原矩陣printf("\nL矩陣和U矩陣乘積\n");for(i=0;i<n;i++) { for(j=0;j<n;j++) {out[i][j]=0;}}for(i=0;i<n;i++) { for(j=0;j<n;j++) { for(k=0;k<n;k++) {out[i][j]+=L[i][k]*U[k][j];} }}for(i=0;i<n;i++){ for(j=0;j<n;j++) { printf("%lf\t",out[i][j]); }printf("\r\n");}//////////將r和u相乘,得到逆矩陣printf("\n原矩陣的逆矩陣:\n");for(i=0;i<n;i++) { for(j=0;j<n;j++) {out1[i][j]=0;}}for(i=0;i<n;i++) { for(j=0;j<n;j++) { for(k=0;k<n;k++) {out1[i][j]+=u[i][k]*r[k][j];} }}fo
溫馨提示
- 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 生產(chǎn)流程再造之路
- 色彩魔法課堂
- 碩士之旅:理論探索與實(shí)踐
- 增材制造與創(chuàng)新設(shè)計(jì):從概念到產(chǎn)品 課件 第4、5章 增材制造前處理及工藝規(guī)劃、增材制造后處理及經(jīng)驗(yàn)總結(jié)
- 農(nóng)業(yè)盛季財(cái)務(wù)透析
- 垃圾分類你我共建
- 邁向明日啟航夢(mèng)想
- 外匯質(zhì)押合同(2篇)
- 2024深圳二手房購(gòu)房定金及房屋維修保養(yǎng)服務(wù)合同3篇
- 標(biāo)準(zhǔn)格式離婚協(xié)議書
- 《戰(zhàn)略三環(huán) 規(guī)劃 解碼 執(zhí)行》讀書筆記思維導(dǎo)圖PPT模板下載
- GB/T 42249-2022礦產(chǎn)資源綜合利用技術(shù)指標(biāo)及其計(jì)算方法
- 2023年百一測(cè)評(píng)-房地產(chǎn)企業(yè)崗位招聘工程副總經(jīng)理筆試試題
- 人教版小學(xué)數(shù)學(xué)二年級(jí)口算題和應(yīng)用題
- 扶梯吊裝方案
- GB/T 26846-2011電動(dòng)自行車用電機(jī)和控制器的引出線及接插件
- GB/T 18015.1-1999數(shù)字通信用對(duì)絞或星絞多芯對(duì)稱電纜第1部分:總規(guī)范
- 期末家長(zhǎng)會(huì)(小學(xué)生一年級(jí)期末家長(zhǎng)會(huì)課件)
- 【高教版周紹敏】 電工技術(shù)基礎(chǔ)與技能教案
- 企業(yè)數(shù)字化建設(shè)-采購(gòu)平臺(tái)規(guī)劃方案PPT
- 2020-2021學(xué)年青島版五年級(jí)上冊(cè)期末考試數(shù)學(xué)試卷(1)1
評(píng)論
0/150
提交評(píng)論