请补充完整程序,使得程序能实现以下功能: 从文件IN.dat中读取200个整数至数组number中,求出最大
请补充完整程序,使得程序能实现以下功能:
从文件IN.dat中读取200个整数至数组number中,求出最大数max及最大数的个数cnt和数组number中能被3整除或能被7整除的算术平均值ave(保留2位小数)。把结果max、 cnt、ave输出到OUT. dat文件中。
注意:部分程序、读数据函数read_ dat (int number[200])及输出格式已给出。
include <conio. h>
include <stdio. h>
define N 200
void read_ dat(int number[N])
{ int i, j;
FILE *fp;
fp = fopen("IN. dat", "r");
for (i=0; i<20; i++)
{ for (j=0; j<10; j++)
{ fscanf(fp, "%d,", &number[i*10+j]);
printf("%d ", number[i*10+j]);
}
printf ("\n");
}
fclose (fp);
}
void main ()
{ int cnt, number[N], max;
float ave;
FILE *fw;
int i, k; '
long j = 0;
fw = fopen("OUT.dat", "w");
read_ dat (number);
/ ************************************************ /
/ ************************************************ /
printf("\n\nmax=%d, cnt=%d, ave=%6.2f\n", max, cnt, ave);
fprintf(fw, "%d\n%d\n%6.2f\n", max, cnt, ave);
fclose (fw);
}
max = number[0]; for (i=1, k=0; iN; i++) { if (number[i] > max) max = number[i]; if (number[i]%3==0 || number[i]%7==0) { j += number[i]; k++; } } for (i=0, cnt=0; iN; i++) if (number[i] == max) cnt++; ave = (float) (j*100/k)/100; [解题思路] 用整型变量max保存数组number中元素的最大值,首先把数组number的第一个元素number[0]存入max中;然后在for循环语句中当循环变量i从1递增到N-1时, 对数组number中的每一个元素number[i]与max进行比较,如果表达式number[i]>max成立,则把数组元素number[i]的值存入变量max中;再用表达式number[i]%3==0|| number[i]%7==0判断number[i]能否被3或7整除,如果表达式结果值为真,则把数组元素 number[i]的值与变量j的值相加,同时计数变量k加1。退出循环后,变量max中的值就是数组number中元素的最大值,再用for循环语句对数组number中的每一个元素与max的值进行相等的判断,如果number[i]的值等于max,则计数变量cnt加1。最后用表达式 (float)(j*100/k)/100求得数组number中能被3整除或能被7整除的算术平均值。
设A是n阶矩阵A^2=E,证明r(A+E)+r(A-E)=n,的一步证明过程不懂由A^2=E,得A 数学 2020-05-14 …
设A为n阶方阵,E为N阶单位矩阵,且A^2-A=2E,证明则r(2E-A)+r(E+A)=n设A为 数学 2020-05-15 …
按字母拼单词1、M-F-R-R-E-A2、V-T-E-S3、O-S-E-M-U4、S-L-U-E- 英语 2020-05-16 …
已知f(x)是定义在[-e,0)∪(0,e]上的奇函数,当x∈(0,e]时,f(x)=ax+2ln 其他 2020-05-17 …
怎么求电场的散度最终求得类似于divE=k/r^2的式子,并且k=0.意味着在r!=0时,E的散度 物理 2020-06-02 …
纵横字谜之英语暑假作业题(s)(o)(r)(r)(n)(g)(r)(e))(a)(k)(k)(e) 英语 2020-06-06 …
E^2*R/(R+r)^2=E^2/(R-r)^2/R+4r(某公式推导最后两行)本人只得:=E^ 物理 2020-06-07 …
(E-A)A=0,r(A)=r,则知(E-A)X=0至少有r个线性无关的解向量,为什么?不是就是r 数学 2020-07-07 …
惫设f(x)=-m(m+e)x2,g(x)=x2+(m-1)x-m,其中e均自然对数的底数,若∃x 数学 2020-08-02 …
积分的问题∫∫e^(x^2+y^2)∫∫e^(x^2+y^2)=∫(0,π/2)dθ∫(0,R)re 数学 2020-10-31 …