函数ReadDat()实现从文件IN47.DAT中读取1000个十进制整数到数组xx屯。请编制函数Compum()分别计算
函数ReadDat()实现从文件IN47.DAT中读取1000个十进制整数到数组xx屯。请编制函数Compum()分别计算出xx中偶数的个数even、奇数的平均值ave1、偶数的平均值ave2及所有偶数的方差totfc的值,最后调用函数WilteDat()把结果输出到OUT47.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] , dd=O, even=O;
double avel=0.0,ave2=0.0,totfc=0.0;
void WriteDat(void);
int ReadDat (void)
{ FILE *fp;
int i,j;
if ( (fp=fopen ("IN47. 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, "In");
if(feof(fp)) break;
}
fclose (fp);
}
void Compute (void)
{
}
void main ( )
{ int i;
for (i=0; i<MAX; i++)
xx[i]=0;
if (ReadDat ())
{
printf ("数据文件IN47.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;
int i;
fp=fopen("OUT47.DAT","w");
fprintf(fp,"%d\n%lf\n%lf\n%lf\n",even,avel,ave2,totfc);
fclose(fp);
}
void Compute(void) { int i,yy[MAX]; for(i=O;ilO00;i++) if (xx[i]%2 !=0) { odd++; /*统计奇数的个数*/ avel+=xx [i]; /*求奇数的总和*/ } else { even++; /*统计偶数的个数*/ ave2+=xx [i]; /*求偶数的总和*/ yy [even-1 ] =xx [ii; /*将偶数存入数组yy中* / } avel/=odd; /*求奇数的平均数*/ ave2/=even; /*求偶数的平均数*/ for (i=O; ieven; i++) /*求所有偶数的方差* / totfc+= (yy [i] -ave2) * (yy [i] -ave2)/even; 解析:本题考查的知识点如下:
(1)从文件中读取数据。
(2)奇偶数的判断和方差的求法。
在C语言中,有一结构体类型FILE,其中包含文件的一些属性信息。可定义指针指向该结构体,这个指针称为文件指针。要从文件中读取数据,首先要判断该:文件是否能以“读”的方式打开。若能打开,使用函数int fscanf(FILE*fp,char*format,args)从fp所指向的文件中依次读取数据。在本题中,数据的存放很有规律,将数据读出存入数组xx时,只要控制数组下标就可以了。若文件结束,则退出读取循环。最后要关闭文件。若…个数除以2取余得0,则该数是偶数,否则为奇数。由方差公式可知,这是求一些连续的数的表达式的值,所以可以使用循环求得方差。
设3阶方阵A的属于特征值1,0,-1的特征向量为p1=(1,1,0)^T,p2=(1,0,1)^T 数学 2020-05-14 …
大二线代题由a1=(1,1,0,0)^T,a2=(1,0,1,1)^T所生成的向量空间记作V1,由 数学 2020-06-11 …
刘老师,您好。有种类型的题目一直没弄懂。是关于基的问题已知α1=(1,1,1)T,α2=(0,1, 其他 2020-06-23 …
信号与系统,关于冲激平衡法冲激平衡法的使用有没有限制条件?是只能应用于LT吗I.给出题目y"(t) 物理 2020-07-05 …
给定向量组a1=(-2,1,0,3)T,a2=(1,-3,2,4)T,a3=(3,0,2,-1)T 数学 2020-07-09 …
二次型的化标准型的问题!设XTAX=x1^2+4*x2^2+x3^2+2aX1X2+2bX1X3+ 数学 2020-07-31 …
设3阶矩阵A有两重特征值a1,...,都是对应于a1的特征向量,问A可否对角化设3阶矩阵A有两重特征 数学 2020-10-31 …
向量组问题,条件给足了向量组A=(a1,a2,a3).a1=(1,0,1)^T,a2=(0,1,1) 数学 2020-10-31 …
设R^3中的一组基ξ1=(1,-2,1)T,ξ2=(0,1,1)T,ξ3=(3,2,1)T,向量α在 数学 2020-11-02 …
已知α1=(1,0,1)Tα2=(0,1,1)Tα3=(1,3,5)T不能由β1=(1,1,1)T, 数学 2020-12-23 …