函数ReadDat()的功能是实现从文件IN83.DAT中读取1000个十进制整数到数组xx中。请编制函数Compute()分别计算出xx中偶数的个数even、奇数的平均值ave1、偶数的平均值ave2及所有偶数的方差totfc的值，最后调用函数WriteDat()把结果输出到OUT83.DAT文件中。

计算方差的公式如下：

设N为偶数的个数，xx[i]为偶数，ave2为偶数的平均值。

原始数据的存放格式是：每行存放10个数，并用逗号隔开(每个数均大于0且小于等于2000)。

注意：部分源程序已给出。

请勿改动主函数main()、读函数ReadDat()和写函数WriteDat()的内容。

试题程序：

#include ＜stdio.h＞

#include ＜stdlib.h＞

#include ＜string.h＞

#define MAX 1000

int xx[MAX]，odd=0，even=0；

double ave1=0.0，ave2=0.0，totfc=0.0；

void WriteDat(void)；

int ReadDat(void)

FILE * fp；

int i，j；

if((fp=fopen("IN83.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，"\n")；

if(feof(fp))break；

fclose(fp)；

return 0；

void Compute(void)

void main()

int i；

for(i=0；i＜MAX；i + +)

xx[i]=0；

if(ReadDat())

printf("数据文件IN83.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；

fp=fopen("OUT83.DAT"，"w")；

fprintf(fp，"% d\n% 1f\n% 1f\n% 1f\n"，even，ave1，ave2，totfc)；

fclose(fp)；