已知在文件IN13.DAT中存有若干个(个数<200)4位数字的正整数，函数ReadDat()的功能是读取这若干个正整数并存入数组xx中。请编制函数CalValue()，其功能要求：(1)求出该文件中共有多少个正整数totNum；(2)求这些数右移1位后，产生的新数是偶数的数的个数totCnt，以及满足此条件的这些数(右移前的值)的算术平均值totPjz，最后调用函数WriteDat()把所求的结果输出到文件OUT13.DAT中。
注意：部分源程序已给出
请勿改动主函数main()、读函数ReadDat()和写函数WriteDat()的内容。
试题程序：
#include〈stdio.h>
#include〈conio.h>
#define MAXNUM 200
int xx [MAXNUM];
int totNum = 0; /* 文件IN13.DAT 中共有多少个正整数 */
int totCnt = 0; /* 符合条件的正整的个数 */
double totPjz = 0.0; /* 平均值 */
int ReadDat (void);
void Writedat(void); void CalValue(void)
main ( )
int i;
clrscr ();
for(i = 0; i〈MAXNUM; i++)
xx[i] = 0;
if (ReadDat ())
printf ("数据文件 IN13.DAT 不能打开! \007\n");
return;
CalValue ();
printf("文件IN1B.DAT 中共有正整数= %d 个\n", totNum);
printf("符合条件的正整数的个数= %d 个\n", totCnt);
printf("平均值=%.21f\n", totPjz)
Writedat ();
int ReadDat (void)
FILE *fp;
int i = 0;
if((fp = fopen ("IN13.DAT", "r")) == NULL)
return 1;
while(! feof(fp))
fscanf(fp, "%d,", &xx[i++]);
fclose(fp);
return 0;
void WriteDat(void)
FILE *fp;
fp = fopen("OUT13.DAT", "w");
fprintf(fp, "%d\n%d\n%.21f\n", totNum, totCnt, totPjz);
fclose (fp);
