




版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
1、#include<stdio.h>#include <conio.h>#define MAXSIZE 12500#define OK 1#define ERROR 0#define OVERFLOW -2typedef int Status;typedef int ElemType;typedef struct int i,j; int e;Triple;typedef struct Triple dataMAXSIZE+1; int mu,nu,tu;TSMatrix;Status CreateSMatrix(TSMatrix &M)int w,m,n; wh
2、ile(1) printf("請(qǐng)輸入行:"); scanf("%d",&M.mu); if(M.mu>0) break; if(M.mu<=0) printf("行不能為0n"); continue; while(1) printf("請(qǐng)輸入列:"); scanf("%d",&M.nu); if(M.nu>0) break; if(M.nu<=0) printf("列不能為0n"); continue; printf("請(qǐng)輸入
3、非零元素:"); scanf("%d",&M.tu); for(w=1;w<=M.tu;w+) printf("請(qǐng)輸入元素所在行,列,元素值:n"); scanf("%d %d %d",&M.dataw.i,&M.dataw.j,&M.dataw.e); if(M.dataw.i<=0|M.dataw.j<=0|M.dataw.i>M.mu|M.dataw.j>M.nu) printf("輸入錯(cuò)誤1!n"); w-; for(m=1;m<
4、=w;m+) for(n=0;n<m;n+) if(M.datam.i<M.datan.i) printf("輸入錯(cuò)誤2!n"); w-; break;else if(M.datam.i=M.datan.i&&M.datam.j<M.datan.j)printf("輸入錯(cuò)誤3!n"); w-; break; else if(M.datam.i=M.datan.i&&M.datam.j=M.datan.j) printf("輸入重復(fù)!n"); w-; break; return OK;S
5、tatus ShowSMatrix(TSMatrix M)int i,j,t=1;printf("矩陣為:n");for(i=1;i<=M.mu;i+)for(j=1;j<=M.nu;j+)if(M.datat.i=i&&M.datat.j=j)printf("%dt",M.datat.e);t+;else printf("0t");printf("n");return OK;Status TransposeSMatrix(TSMatrix M,TSMatrix &T) T.mu
6、=M.nu;T.nu=M.mu;T.tu=M.tu; int col; int p,q; if(T.tu) q=1; for (col=1;col<=M.nu;col+) for(p=1;p<=M.tu;p+) if(M.datap.j=col) T.dataq.i=M.datap.j; T.dataq.j=M.datap.i; T.dataq.e=M.datap.e; +q; printf("矩陣轉(zhuǎn)置成功!n"); printf("轉(zhuǎn)置后的"); ShowSMatrix(T); return OK;Status DestorySMatrix
7、(TSMatrix &M)M.mu=0;M.nu=0;M.tu=0;return OK;Status FastTransposeSMatrix(TSMatrix M, TSMatrix &T) int num100; int cpot100; int col,i,p,q; T.mu = M.nu ;T .nu = M.mu ; T.tu = M.tu ; if ( T.tu ) for(col = 1; col <=M.nu; +col) numcol =0; for( i = 1; i <=M.tu; +i) col =M.data i .j ; +num col
8、 ; cpot1 =1; for(col = 2; col <=M.nu; +col) cpotcol=cpotcol-1+num col-1 ; for( p =1; p <=M.tu ; +p ) col =M.datap.j; q=cpot col; T.dataq.i = M.datap. j; T.dataq.j = M.datap. i; T.dataq.e= M.datap. e; +cpotcol ; printf("矩陣快速轉(zhuǎn)置成功!n"); printf("轉(zhuǎn)置后的");ShowSMatrix(T);return OK;
9、int main() printf("*n"); printf("* 1.創(chuàng)建矩陣 *n"); printf("* 2.銷毀矩陣 *n"); printf("* 3.輸出矩陣 *n"); printf("* 4.轉(zhuǎn)置矩陣 *n"); printf("* 5.快速轉(zhuǎn)置矩陣 *n"); printf("* 6.轉(zhuǎn)置矩陣對(duì)比 *n"); printf("* 7.輸入一個(gè)負(fù)數(shù)退出*n"); printf("*n"); TSM
10、atrix M,T; int num; M.mu=0; do printf("Please input the operation you need:"); scanf("%d",&num); switch(num) case 1: CreateSMatrix(M); printf("矩陣初始化成功!n"); break;case 2:if(M.mu=0)printf("矩陣不存在!n");else DestorySMatrix(M); printf("矩陣已銷毀!n"); break;case 3:if(M.mu=0)printf("矩陣不存在!n"); else ShowSMatrix(M); break;case 4:if(M.mu=0)printf(&
溫馨提示
- 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ì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 分析項(xiàng)目管理考試的評(píng)分標(biāo)準(zhǔn)試題及答案
- 江蘇省贛榆縣海頭高級(jí)中學(xué)2024-2025學(xué)年高一生物上學(xué)期周練練習(xí)1無(wú)答案
- 微生物檢驗(yàn)過(guò)程中的常見(jiàn)問(wèn)題試題及答案
- 未來(lái)項(xiàng)目管理考試評(píng)估標(biāo)準(zhǔn)試題及答案
- 微生物檢驗(yàn)師的責(zé)任與使命試題及答案
- 課題申報(bào)書(shū)參考
- 重要考點(diǎn)2025年注冊(cè)會(huì)計(jì)師考試總結(jié)試題及答案
- 學(xué)術(shù)課題申報(bào)書(shū)
- 證券從業(yè)資格證考試相關(guān)法律條款試題及答案
- 對(duì)項(xiàng)目實(shí)施過(guò)程的反思與總結(jié)方式試題及答案
- 2023年福建省三明市中考二模數(shù)學(xué)試卷(原卷版)
- 村上開(kāi)無(wú)土地證明(標(biāo)準(zhǔn)版)
- 臨床用藥安全與合理用藥
- 智能化系統(tǒng)施工方案
- 中國(guó)西部學(xué)前教育發(fā)展情況報(bào)告
- 《國(guó)歌法》、《國(guó)旗法》主題班會(huì)
- 第七章總體分布的擬合優(yōu)度檢驗(yàn)
- 我最喜歡的電影綠皮書(shū)課件
- 重機(jī)1900縫紉機(jī)使用說(shuō)明書(shū)課件
- 技師承諾不涉黃協(xié)議書(shū)
- 刑事證據(jù)課件
評(píng)論
0/150
提交評(píng)論