函数ReadDat()实现从文件IN47.DAT中读取1000个十进制整数到数组xx屯。请编制函数Compum()分别计算出xx中偶数的个数even、奇数的平均值ave1、偶数的平均值ave2及所有偶数的方差totfc的值，最后调用函数WilteDat()把结果输出到OUT47.DAT文件中。
计算方差的公式如下：

设N为偶数的个数，xx[i]为偶数，ave2为偶数的平均值。
原始数据的存放格式是：每行存放10个数，并用逗号隔开(每个数均大于0且小于等于2000)。
注意：部分源程序已给出。
请勿改动主函数main()、读函数ReadDat()和写函数WriteDat()的内容。
试题程序：
#include＜stdio. h＞
#include＜stdlib. h＞
#include＜string. h＞
#define MAX 1000int xx [MAX] , odd=O, even=O;
double avel=0.0,ave2=0.0,totfc=0.0;
void WriteDat(void);int ReadDat (void)
FILE *fp;
int i,j;
if ( (fp=fopen ("IN47. DAT", "r") )==NULL)
return 1;
for (i=0; i＜100;i++)

for (j=0; j＜10; j++)
fscanf (fp, "%d, ",&xx [i*10+j ] );
fscanf (fp, "In");
if(feof(fp)) break;

fclose (fp);
void Compute (void)
void main ( )
int i;
for (i=0; i＜MAX; i++)
xx[i]=0;
if (ReadDat ())

printf ("数据文件IN47.DAT 不能打开! \007\n");
return;

Compute ( );
printf ( "EVEN=%d\nAVE1=%f\nAvE2=%f\nTOTFC=%f\n" , even, ave1, ave2,
totfc);
WriteDat ();

void WriteDat(void)

FILE *fp;
int i;
fp=fopen("OUT47.DAT","w");
fprintf(fp,"%d\n%lf\n%lf\n%lf\n",even,avel,ave2,totfc);
fclose(fp);