2010年全國計算機(jī)等級考試四級上機(jī)編程題型一

　�。牭诙�套

　�。牐�

　�。牐�===============================================================================

　�。牐犜囶}說明 :

　�。牐�===============================================================================

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

　�。牐� 注意: 部分源程序存放在PROG1.C中。

　　�牐� 請勿改動主函數(shù)main( )、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)

　�。牐牶瘮�(shù)WriteDat()的內(nèi)容。

　�。牐�===============================================================================

　�。牐牫绦� :

　　�牐�===============================================================================

　�。牐�#include

　�。牐�#include

　�。牐�#define MAXNUM 200

　�。牐�

　�。牐爄nt xx[MAXNUM] ;

　�。牐爄nt totNum = 0 ; /* 文件IN.DAT中共有多少個正整數(shù) */

　�。牐爄nt totCnt = 0 ; /* 符合條件的正整數(shù)的個數(shù) */

　�。牐燿ouble totPjz = 0.0 ; /* 平均值 */

　�。牐爄nt ReadDat(void) ;

　�。牐爒oid WriteDat(void) ;

　�。牐爒oid CalValue(void)

　�。牐爗

　　�牐�

　�。牐�

　�。牐�

　�。牐爙

　�。牐�

　　�牐爒oid main()

　�。牐爗

　�。牐� clrscr() ;

　�。牐� if(ReadDat()) {

　�。牐� printf("數(shù)據(jù)文件IN.DAT不能打開!\007\n") ;

　　�牐� return ;

　�。牐� }

　�。牐� CalValue() ;

　　�牐� printf("文件IN.DAT中共有正整數(shù)=%d個\n", totNum) ;

　�。牐� printf("符合條件的正整數(shù)的個數(shù)=%d個\n", totCnt) ;

　�。牐� printf("平均值=%.2lf\n", totPjz) ;

　�。牐� WriteDat() ;

　�。牐爙

　　�牐�

　�。牐爄nt ReadDat(void)

　�。牐爗

　�。牐� FILE *fp ;

　　�牐� int i = 0 ;

　　�牐�

　�。牐� if((fp = fopen("in.dat", "r")) == NULL) return 1 ;

　�。牐� while(!feof(fp)) {

　　�牐� fscanf(fp, "%d,", &xx[i++]) ;

　�。牐� }

　　�牐� fclose(fp) ;

　�。牐� return 0 ;

　�。牐爙