1999年9月全国计算机等级考试四级机试试题及答案(已运行通过)

文章作者 100test 发表时间 2007:05:18 11:15:36
来源 100Test.Com百考试题网

1./*PROG1 已知在文件IN.DAT中存有若干个（个数<200）四位数字的正整数，
函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue()，
其功能要求：1、求出这文件中共有多少个正整数totNum；２、求出这些数中的
各位数字之和是偶数的数的个数totCnt，以及满足此条件的这些数的算术平均
值totpjZ，最后调用函数WriteDat()把所求的结果输出到文件OUT2.DAT中。
注意：部分部分源程序存放在PROG1.C中。
请勿改动主函数main()，读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/
#include
#include
#define MAXNUM 200

int xx[MAXNUM] .
int totNum = 0 . /* 文件IN.DAT中共有多少个正整数 */
int totCnt = 0 . /* 符合条件的正整数的个数 */
double totPjz = 0.0 . /* 平均值 */

int ReadDat(void) .
void WriteDat(void) .

void CalValue(void)
{ int i.
int a,b,c,d.
double sum=0.
for (i=0.iif (xx[i]>0)
{
totNum .
a=xx[i]/1000.
b=xx[i]/100-a*10.
c=xx[i]/10-a*100-b*10.
d=xx[i].
if((a b c d)%2==0)
{totCnt .
sum=sum xx[i].
}
}
totPjz=sum/totCnt.
}

void main()
{
clrscr() .
if(ReadDat()) {
printf("数据文件IN.DAT不能打开!\007\n") .
return .
}
CalValue() .
printf("文件IN.DAT中共有正整数=%d个\n", totNum) .
printf("符合条件的正整数的个数=%d个\n", totCnt) .
printf("平均值=%.2lf\n", totPjz) .
WriteDat() .
}

int ReadDat(void)
{
FILE *fp .
int i = 0 .

if((fp = fopen("in.dat", "r")) == NULL) return 1 .
while(!feof(fp)) {
fscanf(fp, "%d,",