離散數(shù)學(xué)上機實驗報告

1、精選優(yōu)質(zhì)文檔-傾情為你奉上離散數(shù)學(xué)實驗報告姓名：學(xué)號：班級：實驗一連結(jié)詞邏輯運算一.實驗?zāi)康膶崿F(xiàn)二元合取、析取、蘊涵和等價表達式的計算。熟悉連接詞邏輯運算規(guī)則，利用程序語言實現(xiàn)邏輯這幾種邏輯運算。二.實驗內(nèi)容從鍵盤輸入兩個命題變元P和Q的真值，求它們的合取、析取、蘊涵和等價四種運算的真值。要求對輸入內(nèi)容進行分析，如果不符合0、1條件需要重新輸入，程序有良好的輸入輸出界面。三.實驗環(huán)境使用Microsoft VisualC+6.0為編程軟件，采用稱C/C+語言為編程語言實現(xiàn)。四.實驗過程1.算法分析:合?。簆，q都為1的時候為1，其他為0析?。簆，q都為0的時候為0，其他為1蘊含：p為1，q為0

2、時為0，其他為1等價：p，q同真同假2.程序代碼:#includeint main()int P,Q,a,b,c,d,p,q;printf( P的值);for(P=0;P2;P+)for(Q=0;Q2;Q+)printf(t%d,P);printf(n Q的值);for(P=0;P2;P+)for(Q=0;Q2;Q+)printf(t%d,Q);printf(n 非P的值);for(P=0;P2;P+)for(Q=0;Q2;Q+)if(P=0)/*判斷非P的值*/p=1;elsep=0;printf(t%d,p);printf(n 非Q的值);for(P=0;P2;P+)for(Q=0;Q2;

3、Q+)if(Q=1)/*判斷非Q的值*/q=0;elseq=1;printf(t%d,q);printf(n P與Q的值);for(P=0;P2;P+)for(Q=0;Q2;Q+)if(Q=0|P=0)/*判斷P與Q的值*/a=0;elsea=1;printf(t%d,a);printf(n P或Q的值);for(P=0;P2;P+)for(Q=0;Q2;Q+)if(Q=1|P=1)/*判斷P或Q的值*/b=1;elseb=0;printf(t%d,b);printf(nP蘊含Q的值);for(P=0;P2;P+)for(Q=0;Q2;Q+)if(P=1&Q=0)/*判斷P蘊含Q的值*/c=0

4、;elsec=1;printf(t%d,c);printf(nP等價Q的值);for(P=0;P2;P+)for(Q=0;Q2;Q+)if(P=Q)/*判斷P等價Q的值*/d=1;elsed=0;printf(t%d,d);printf(n);return 0;3.實驗數(shù)據(jù)及結(jié)果分析:實驗二 關(guān)系的復(fù)合運算及逆運算一.實驗?zāi)康氖煜りP(guān)系的復(fù)合運算和逆運算，編程實現(xiàn)關(guān)系復(fù)合運算和逆運算算法。二.實驗內(nèi)容利用矩陣求解有限集上的復(fù)合關(guān)系和逆關(guān)系。三.實驗過程1.算法分析:復(fù)合運算就將兩個用矩陣表示的關(guān)系進行復(fù)合，即在第一個矩陣中尋找值為1的元素坐標(biāo)(i ,j )，在第二個矩陣第j行尋找值為1的元素，若

5、有，且坐標(biāo)為(j ,k )，則產(chǎn)生的新的關(guān)系的矩陣中坐標(biāo)為(i ,k )的元素值為1。逆運算就是將用矩陣中值為1的元素坐標(biāo)(i ,j)對調(diào)，產(chǎn)生新的關(guān)系的矩陣中坐標(biāo)為(j ,i )的元素值為1。2.程序代碼:/關(guān)系的復(fù)合運算#includeusing namespace std;int main()int a100100,b100100,c100100,i,j,k,n;coutn;cout請輸入關(guān)系矩陣Mr的格式:endl;for(i=0;in;i+)for(j=0;jaij;cout請輸入關(guān)系矩陣Ms的格式:endl;for(i=0;in;i+)for(j=0;jbij;for(i=0;in

6、;i+) /進行復(fù)合運算for(j=0;jn;j+)if(aij=1)for(k=0;kn;k+)if(bjk=1)cik=1;for(i=0;in;i+)for(j=0;jn;j+)if(cij!=1)cij=0;coutendl;cout關(guān)系矩陣Mr與Ms的復(fù)合運算結(jié)果是:endl;for(i=0;in;i+)for(j=0;jn;j+)coutcij ;coutendl;return 0;/關(guān)系的逆運算#includeint main()int a100100,b100100,n,i,j,index;printf(請輸入集合X中元素的個數(shù):);scanf(%d,&n);printf(請輸

7、入關(guān)系矩陣Mr的格式:n);for(i=0;in;i+)for(j=0;jn;j+)scanf(%d,&aij);for(i=0;in;i+)/進行逆運算for(j=0;jn;j+)if(aij=1)index=i;i=j;j=index;bij=1;for(i=0;in;i+)for(j=0;jn;j+)if(bij!=1)bij=0;printf(n關(guān)系矩陣M rc為:n);for(i=0;in;i+)for(j=0;jn;j+)printf(%d ,bij);printf(n);return 0;3.實驗數(shù)據(jù)及結(jié)果分析:實驗三關(guān)系的閉包運算一.實驗?zāi)康氖煜りP(guān)系的閉包運算，編程實現(xiàn)關(guān)系閉包

8、運算算法。二.實驗內(nèi)容利用矩陣求解有限集上給定關(guān)系的自反、對稱和傳遞閉包。三.實驗過程1.算法分析:在三種閉包中自反和對稱閉包的求解很容易，對矩陣表示的關(guān)系，其自反閉包只要將矩陣的主對角線全部置為1就可；對稱閉包則加上關(guān)系的轉(zhuǎn)置矩陣（邏輯加法）；傳遞閉包則直接根據(jù)t(R)=R +。2.程序代碼:#includeusing namespace std;void deliver(int x100100,int y100100,int n);int main()int i,j,n,R100100,r100100,s100100,t100100;coutn;coutendl請輸入R的關(guān)系矩陣:endl

9、;for(i=0;in;i+) /輸入R的關(guān)系矩陣for(j=0;jRij;for(i=0;in;i+) /將R的關(guān)系矩陣賦值給r,s,tfor(j=0;jn;j+)rij=Rij;sij=Rij;tij=Rij;for(i=0;in;i+) /自反閉包運算if(rii=0)rii=1;coutendl自反閉包關(guān)系矩陣r(R):endl;for(i=0;in;i+) /輸出r的關(guān)系矩陣for(j=0;jn;j+)coutrij ;coutendl;for(i=0;in;i+) /對稱閉包運算for(j=0;ji;j+)if(sij=1|sji=1)sij=1;sji=1;coutendl對稱閉

10、包關(guān)系矩陣s(R):endl;for(i=0;in;i+) /輸出s的關(guān)系矩陣for(j=0;jn;j+)coutsij ;coutendl;deliver(t,R,n); /關(guān)于傳遞閉包的函數(shù)return 0;void deliver(int x100100,int y100100,int n)/關(guān)于傳遞閉包的函數(shù)int i,j,k,m,z100100;for(m=0;mn;m+)for(i=0;in;i+) for(j=0;jn;j+)if(xij=1)for(k=0;kn;k+)if(yjk=1) /進行復(fù)合運算zik=1;for(i=0;in;i+) for(j=0;jn;j+)if(

11、zij!=1)zij=0;for(i=0;in;i+) for(j=0;jn;j+)xij=xij+zij; /進行傳遞閉包運算for(i=0;in;i+) for(j=0;jn;j+)if(xij!=0)xij=1;coutendl傳遞閉包關(guān)系矩陣t(R):endl;for(i=0;in;i+) /輸出x的關(guān)系矩陣for(j=0;jn;j+)coutxij ;coutendl;3.實驗數(shù)據(jù)及結(jié)果分析:實驗四圖的矩陣表示一.實驗?zāi)康氖煜D的矩陣表示方法鄰接矩陣、可達矩陣和關(guān)聯(lián)矩陣。二.實驗內(nèi)容利用鄰接矩陣得到的可達矩陣來求解圖的連通性質(zhì)。三.實驗過程1.算法分析:可達矩陣表示圖中任意兩個節(jié)點間

12、的可達關(guān)系，而鄰接矩陣表示圖中任意兩個節(jié)點的鄰接關(guān)系。求解鄰接矩陣 A1，A2，A3An可知任意兩個節(jié)點之間是否存在互相連通的路，從而判斷是否可達。2.程序代碼:#includeusing namespace std;void main()int i,j,k,n,m,a100100,b100100,c100100,d100100;coutn;cout請輸入鄰接矩陣a:endl;for(i=0;in;i+)for(j=0;jaij;bij=aij; for(i=0;in;i+) /矩陣d為零矩陣for(j=0;jn;j+)dij=0;for(m=0;mn;m+)for(i=0;in;i+) /矩陣c為零矩陣for(j=0;jn;j+)cij=0;for(k=0;kn;k+)for(i=0;in;i+)for(j=0;jn;j+)cki=cki+bkj*aji; /矩陣的乘法運算for(i=0;in;i+)for(j=0;jn;j+)bij=cij;dij=dij+bi