10./* 已知在文件IN.BAT中存有N个实数(N<200)，函数ReadDAT()读取
这N个实数并存入数组XX中。
请编制函数CalValue()，其功能要求是：1.求出这N个实数的平
均值aver；2.分别求出这N个实数的整数部分值的平均值averint以
及其小数部分值的平均值averdel，最后调用函数WriteDAT()把所求
的结果输出到文件out10.DAT中。
注意：部分源程序存放在文件PROG1.C中。
请勿改动主函数main()，读数据函数ReadDAT()和输出数据函数
WreitDAT的内容。*/
#include <stdio.h>
#include <conio.h>
#define MAXNUM 200
float xx[MAXNUM] ;
int N = 0 ; /* 文件IN.DAT中共有多少个实数 */
double aver = 0.0 ; /* 平均值 */
double averint = 0.0 ; /* 整数部分值的平均值 */
double averdec = 0.0 ; /* 小数部分值的平均值 */
int ReadDat(void) ;
void WriteDat(void) ;
void CalValue(void)
{
}
void main()
{
clrscr() ;
if(ReadDat()) {
printf("数据文件IN.DAT不能打开!\007\n") ;
return ;
}
CalValue() ;
printf("文件IN.DAT中共有实数%d个\n", N) ;
printf("平均值=%.2lf\n", aver) ;
printf("整数部分值的平均值=%.2lf\n", averint) ;
printf("小数部分值的平均值=%.2lf\n", averdec) ;
WriteDat() ;
}
int ReadDat(void)
{
FILE *fp ;
int j ;
if((fp = fopen("in.dat", "r")) == NULL) return 1 ;
while(!feof(fp)) {
fscanf(fp, "%f,", &xx[N]) ;
if(xx[N] > 0.001) N++ ;
}
fclose(fp) ;
return 0 ;
}
void WriteDat(void)
{
FILE *fp ;
fp = fopen("OUT10.DAT", "w") ;
fprintf(fp, "%d\n%.2lf\n%.2lf\n%.2lf\n", N, aver, averint, averdec) ;
fclose(fp) ;
}
责任编辑：小草
