南开大学出版的C语言上机试题

    题目83：请编制函数ReadDat()实现从文件IN.DAT中读取1000个十进制整数到数组xx中；请编制函数Compute()分别计算出xx中奇数的个数odd，奇数的平均值ave1，偶数的平均值ave2以及所有奇数的方差totfc的值，最后调用函数WriteDat()把结果输出到OUT.DAT文件中。计算方差的公式如下：totfc=1/N∑(xx[i]-ave1)2
    设N为奇数的个数，xx[i]为奇数，ave1为奇数的平均值。
    原始数据文件存放的格式是：每行存放10个数，并用逗号隔开。(每个数均大于0且小于等于2000)
    注意：部分源程序已给出。
    请勿改动主函数main()和输出数据函数writeDat()的内容。
------------------------------
int ReadDat(void) /*标准答案*/
{FILE *fp;
 int I,j;
 if((fp=fopen(""IN.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)
{int I, yy[MAX];
for(I=0;I<1000;I++)
 if(xx[I]%2){odd++;ave1+=xx[I];yy[odd-1]=xx[I];}
 else{even++;ave2+=xx[I];}
 ave1/=odd;
 ave2/=even;
 for(I=0;I<odd;I++)
  totfc+=(yy[I]-ave1)*(yy[I]-ave1)/odd;
}
或者：
int ReadDat(void)
{ int i;
FILE *fp;
if((fp=fopen("IN.DAT","r"))==NULL) return 1;
for(i=0;i<MAX;i++)
{fscanf(fp,"%d,",&xx[i]);
 if((i+1)%10==0)
fscanf(fp,"\n"); }
void Compute(void)
{ int i,j,k;
 for(i=0;i<MAX;i++)
 { if(xx[i]%2)
   { odd++;
     ave1+=xx[i]; }
   else
   { even++;
     ave2+=xx[i];  } }
   ave1/=odd;
   ave2/=even;
   for(i=0;i<MAX;i++)
   if(xx[i]%2)
   totfc+=(xx[i]-ave1)*(xx[i]-ave1);
totfc/=odd;   }