題目37(整數各位打散組合運算題)

　　已知數據文件IN.DAT中存有200個四位數，并已調用讀函數readDat()把這些數存入數組a中，請考生編制一函數jsVal()，其功能是：把個位數字和千位數字重新組成一個新的十位數(新十位數的十位數字是原四位數的個位數字，新十位數的個位數字是原四位數的千位數字)，以及把百位數字和十位數字組成另一個新的十位數(新十位數的十位數字是原四位數的百位數字，新十位數的個位數字是原四位數的十位數字)，如果新組成的兩個十位數均是偶數并且兩個十位數中至少有一個數能被9整除，同時兩個新數的十位數字均不為零，則將滿足此條件的四位數按從大到小的順序存入數組b中，并要計算滿足上述條件的四位數的個數cnt。最后main()函數調用寫函數writeDat( )把結果cnt以及數組b中符合條件的四位數輸出到OUT.DAT文件中。

　　void jsVal()

　　{int i,j,thou,hun,ten,data,ab,cd;

　　for(i=0;i<200;i++)

　　{thou=a[i]/1000; hun=a[i]/100%10;

　　ten=a[i]%100/10; data=a[i]%10;

　　ab=10*data+thou; cd=10*hun+ten;

　　if((ab%9==0||cd%9==0)&&ab%2==0&&cd%2==0&&hun!=0&&data!=0)

　　{b[cnt]=a[i];cnt++;}

　　}

　　for(i=0;i

　　for(j=i+1;j

　　if(b[i]

　　}

　　***********************************************************************

　　★題目38(整數各位打散組合運算題)

　　已知數據文件IN.DAT中存有200個四位數，并已調用讀函數readDat()把這些數存入數組a中，請考生編制一函數jsVal()，其功能是：把個位數字和千位數字重新組成一個新的十位數(新十位數的十位數字是原四位數的個位數字，新十位數的個位數字是原四位數的千位數字)，以及把百位數字和十位數字組成另一個新的十位數(新十位數的十位數字是原四位數的百位數字，新十位數的個位數字是原四位數的十位數字)，如果新組成的兩個十位數必須是一個奇數，另一個為偶數并且兩個十位數中至少有一個數能被17整除，同時兩個新數的十位數字均不為零，則將滿足此條件的四位數按從大到小的順序存入數組b中，并要計算滿足上述條件的四位數的個數cnt。最后main()函數調用寫函數writeDat()把結果cnt以及數組b中符合條件的四位數輸出到

　　OUT.DAT文件中。

　　void jsVal()

　　{int i,j,thou,hun,ten,data,ab,cd;

　　for(i=0;i

　　{thou=a[i]/1000; hun=a[i]/100%10;

　　ten=a[i]%100/10; data=a[i]%10;

　　ab=10*data+thou; cd=10*hun+ten;

　　if((ab%2!=cd%2)&&((ab%17==0||cd%17==0)&&ab>=10&&cd>=10))

　　b[cnt++]=a[i];

　　}

　　for(i=0;i

　　for(j=i+1;j

　　if(b[i]

　　}

　　****************************************************************************

　　題目39(整數各位打散組合運算題)

　　已知數據文件IN.DAT中存有200個四位數，并已調用讀函數readDat()把這些數存入數組a中，請考生編制一函數jsVal()，其功能是：把千位數字和十位數字重新組成一個新的十位數ab(新十位數的十位數字是原四位數的千位數字，新十位數的個位數字是原四位數的十位數字)，以及把個位數字和百位數字組成另一個新的十位數cd(新十位數的十位數字是原四位數的個位數字，新十位數的個位數字是原四位數的百位數字)，如果新組成的兩個十位數ab>cd，ab必須是偶數且能被5整除，cd必須是奇數，同時兩個新數的十位數字均不為零，則將滿足此條件的四位數按從大到小的順序存入數組b中，并要計算滿足上述條件的四位數的個數cnt。最后main()函數調用寫函數writeDat( )把結果cnt以及數組b中符合條件的四位數輸出到OUT.DAT文件中。

　　void jsVal()

　　{int i,j,thou,hun,ten,data,ab,cd;

　　for(i=0;i

　　{thou=a[i]/1000; hun=a[i]%1000/100;

　　ten=a[i]%100/10; data=a[i]%10;

　　ab=10*thou+ten; cd=10*data+hun;

　　if((ab-cd)>0&&(ab%2!=1&&ab%5==0)&&cd%2==1&&ab>=10&&cd>=10)

　　{b[cnt]=a[i];cnt++;}

　　}

　　for(i=0;i

　　for(j=i+1;j

　　if(b[i]

　　}

　　2011計算機等級三級數據庫上機題及答案匯總

　　2011計算機等級三級信息管理復習筆記匯總

　　2011年計算機等級三級PC技術上機100題匯總

　　2011年計算機等級三級網絡技術學習要點匯總