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

1、離散數(shù)學實驗報告姓名：學號：班級：實驗一連結詞邏輯運算一.實驗目的實現(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時為0，其他為1等價：p，

2、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;Q+)if(Q=1)/*判

3、斷非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;elsec=1;prin

4、tf(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ù)及結果分析:實驗二 關系的復合運算及逆運算一.實驗目的熟悉關系的復合運算和逆運算，編程實現(xiàn)關系復合運算和逆運算算法。二.實驗內(nèi)容利用矩陣求解有限集上的復合關系和逆關系。三.實驗過程1.算法分析:復合運算就將兩個用矩陣表示的關系進行復合，即在第一個矩陣中尋找值為1的元素坐標(i ,j )，在第二個矩陣第j行尋找值為1的元素，若有，且坐標為(j ,k )

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

6、or(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關系矩陣Mr與Ms的復合運算結果是:endl;for(i=0;in;i+)for(j=0;jn;j+)coutcij ;coutendl;return 0;/關系的逆運算#includeint main()int a100100,b100100,n,i,j,index;printf(請輸入集合X中元素的個數(shù):);scanf(%d,&n);printf(請輸入關系矩陣Mr的格式:n)

7、;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關系矩陣M rc為:n);for(i=0;in;i+)for(j=0;jn;j+)printf(%d ,bij);printf(n);return 0;3.實驗數(shù)據(jù)及結果分析:實驗三關系的閉包運算一.實驗目的熟悉關系的閉包運算，編程實現(xiàn)關系閉包運算算法。二.實驗內(nèi)容利用

8、矩陣求解有限集上給定關系的自反、對稱和傳遞閉包。三.實驗過程1.算法分析:在三種閉包中自反和對稱閉包的求解很容易，對矩陣表示的關系，其自反閉包只要將矩陣的主對角線全部置為1就可；對稱閉包則加上關系的轉置矩陣（邏輯加法）；傳遞閉包則直接根據(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的關系矩陣:endl;for(i=0;in;i

9、+) /輸入R的關系矩陣for(j=0;jRij;for(i=0;in;i+) /將R的關系矩陣賦值給r,s,tfor(j=0;jn;j+)rij=Rij;sij=Rij;tij=Rij;for(i=0;in;i+) /自反閉包運算if(rii=0)rii=1;coutendl自反閉包關系矩陣r(R):endl;for(i=0;in;i+) /輸出r的關系矩陣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對稱閉包關系矩陣s(R):end

10、l;for(i=0;in;i+) /輸出s的關系矩陣for(j=0;jn;j+)coutsij ;coutendl;deliver(t,R,n); /關于傳遞閉包的函數(shù)return 0;void deliver(int x100100,int y100100,int 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) /進行復合運算zik=1;for(i=0;in;i+) for(j=0;jn;j+)if(zij!=1)zij=0;

11、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傳遞閉包關系矩陣t(R):endl;for(i=0;in;i+) /輸出x的關系矩陣for(j=0;jn;j+)coutxij ;coutendl;3.實驗數(shù)據(jù)及結果分析:實驗四圖的矩陣表示一.實驗目的熟悉圖的矩陣表示方法鄰接矩陣、可達矩陣和關聯(lián)矩陣。二.實驗內(nèi)容利用鄰接矩陣得到的可達矩陣來求解圖的連通性質。三.實驗過程1.算法分析:可達矩陣表示圖中任意兩個節(jié)點間的可達關系，而鄰接矩陣表示

12、圖中任意兩個節(jié)點的鄰接關系。求解鄰接矩陣 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=d