2011年9月計算機等考三級上機實訓100題(5)

　　☆題目13(整數(shù)統(tǒng)計運算題)

　　已知在文件IN.DAT中存有若干個(個數(shù)<200)四位數(shù)字的正整數(shù)，函數(shù)ReadDat()讀取這若干個正整數(shù)并存入數(shù)組xx中。請編制函數(shù)CalValue()，其功能要求：

　　1、求出這文件中共有多少個正整數(shù)totNum;

　　2、求這些數(shù)中的各位數(shù)字之和是偶數(shù)的數(shù)的個數(shù)totCnt，

　　以及滿足此條件的這些數(shù)的算術平均值totPjz，最后調(diào)用函數(shù)writeDat()把所求的結果輸出到文件OUT.DAT中。

　　void CalValue(void)

　　{ int i,qw,bw,sw,gw;

　　for(i=0;i

　　if(xx[i]>0)

　　{ totNum++;

　　qw=xx[i]/1000;

　　bw=xx[i]/100%10;

　　sw=xx[i]%100/10;

　　gw=xx[i]%10;

　　if((qw+bw+sw+gw)%2==0) { totCnt++; totPjz+=xx[i];}

　　}

　　if(totCnt==0) totPjz=0;

　　else totPjz/=totCnt;

　　}

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

　　☆題目14(整數(shù)統(tǒng)計運算題)

　　已知在文件IN.DAT中存有若干個(個數(shù)<200)四位數(shù)字的正整數(shù)，函數(shù)ReadDat()讀取這若干個正整數(shù)并存入數(shù)組xx中。請編制函數(shù)CalValue()，其功能要求：1、求出這文件中共有多少個正整數(shù)totNum;2、求這些數(shù)中的各位數(shù)字之和是奇數(shù)的數(shù)的個數(shù)totCnt，以及滿足此條件的這些數(shù)的算術平均值totPjz，最后調(diào)用函數(shù)writeDat()把所求的結果輸出到文件OUT.DAT中。

　　void CalValue(void)

　　{ int i ,qw,bw,sw,gw;

　　for(i=0;i

　　if(xx[i]>0)

　　{ totNum++;

　　qw=xx[i]/1000; bw=xx[i]/100%10;

　　sw=xx[i]%100/10; gw=xx[i]%10;

　　if((qw+bw+sw+gw)%2) { totCnt++; totPjz+=xx[i];}

　　}

　　if(totCnt==0) totPjz=0;

　　else totPjz/=totCnt;

　　}

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

　　題目15(整數(shù)統(tǒng)計運算題)

　　已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDat()把這些數(shù)存入數(shù)組a中，請考生編制一函數(shù)jsVal()，其功能是：把一個四位數(shù)的千位數(shù)字上的值減去百位數(shù)字上的值再減去十位數(shù)字上的值最后減去個位數(shù)字上的值，如果得出的值大于等于零且原四位數(shù)是奇數(shù)，則統(tǒng)計出滿足此條件的個數(shù)cnt并把這些四位數(shù)按從小到大的順序存入數(shù)組b中，最后調(diào)用寫函數(shù)writeDat()把結果cnt以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

　　注意：部分源程序存在文件prog1.c中。

　　程序中已定義數(shù)組：a[200]，b[200]，已定義變量：cnt

　　請勿改動數(shù)據(jù)文件IN.DAT中的任何數(shù)據(jù)、主函數(shù)main()、讀函數(shù)readDat()和寫函數(shù)writeDat()的內(nèi)容。

　　void jsVal()

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

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

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

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

　　if(thou-hun-ten-data>=0&&a[i]%2) b[cnt++]=a[i];

　　}

　　for(i=0;i

　　for(j=i+1;j

　　if(b[i]>b[j]) {thou=b[i]; b[i]=b[j];b[j]=thou;}

　　}

　　2011計算機等級三級數(shù)據(jù)庫上機題及答案匯總

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

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

　　2011年計算機等級三級網(wǎng)絡技術學習要點匯總