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

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

fclose(fp);return 0;
}

void Compute(void)
{  int i;
  for(i=0;i<MAX;i++)
  if(xx[i]%2)  odd++;
  else  even++;
  for(i=0;i<MAX;i++) aver+=xx[i];
  aver/=MAX;
  for(i=0;i<MAX;i++)
  totfc+=(xx[i]-aver)*(xx[i]-aver);
  totfc/=MAX;
}