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

    题目33：请编制函数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]; }
 else{even++;ave2+=xx[I]; yy[even-1]=xx[I];}
 ave1/=odd;
 ave2/=even;
 for(I=0;I<even;I++)
  totfc+=(yy[I]-ave2)*(yy[I]-ave2)/even;
}
或者：
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++;   ave1+=xx[i];   }
 else { even++;   ave2+=xx[i];   }
 ave1/=odd; ave2/=even;
 for(i=0;i<MAX;i++)
 if(xx[i]%2==0)  totfc+=(xx[i]-ave2)*(xx[i]-ave2);
 totfc/=even;
}