首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
文件IN.DAT中存有200个整数,函数read_dat(int inBuf[MAX])负责将这200个数读到数组inBuf[]中。请编制程序,要求;求出数组inBuf[]中最大数max及最大数的个数count和数组inBuf[]中能被3整除或能被7整除的
文件IN.DAT中存有200个整数,函数read_dat(int inBuf[MAX])负责将这200个数读到数组inBuf[]中。请编制程序,要求;求出数组inBuf[]中最大数max及最大数的个数count和数组inBuf[]中能被3整除或能被7整除的
admin
2012-07-20
72
问题
文件IN.DAT中存有200个整数,函数read_dat(int inBuf[MAX])负责将这200个数读到数组inBuf[]中。请编制程序,要求;求出数组inBuf[]中最大数max及最大数的个数count和数组inBuf[]中能被3整除或能被7整除的数的算术平均值average(保留2位小数),结果输出列OUT.DAT中。
部分程序、读函数read_dat(int inBuf[MAX])及输出格式已给出。
试题程序;
#include
#include
#define MAX 200
void read dat(int inBuf[MAX])
{
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,",&inBuf[i*10+
j]
}
printf("%d",inBuf[i*10+j]);
}
printf("n");
}
fclose(fp);
}
void maln()
{
int count,inBuf[MAX],max;
float average;
FILE*fw;
int i,k=0;
long j;
system("CLS");
fw=fopen("OUT.DAT","w");
read dat(inBuf);
average=0;count=0;max=0;j=0;
printf("\n\nmax=%d,count=%d,aver
age=%6.2f\n",max,count,average);
fprintf(fw,"%d\n%d\n%6.2f\n",max,
count,average);
fclose(fw);
}
选项
答案
for(i=0;i
max) //如果某个数比先前确定的最大值大 max;inBuf[i]; //则将该数设为新的最大值 for(i=0;i
解析
本题主要考查依据数组下标对数据进行筛选及平均值的求法。程序基本步骤是;1.对200个整数进行遍历,求出最大值max,再统计出最大值的个数。2.求出能被3或7整除的数,所以两个条件之间用"或"运算,将满足条件的数累加到j中。3.最后用j/k求其平均值。
转载请注明原文地址:https://kaotiyun.com/show/524Z777K
本试题收录于:
三级网络技术题库NCRE全国计算机三级分类
0
三级网络技术
NCRE全国计算机三级
相关试题推荐
下图为—个简单的互联网示意图。其中,路由器R的路由表中到达网络40.0.0.0的下一跳步IP地址应为______。
以下关于TCP/IP协议的描述中,______是错误的。
域名解析可以有两种方式,一种叫递归解析,另一种叫【 】。
将单位内部的局域网接入Internet(因特网)所需使用的接入设备是______。
宽带综合业务数字网B-ISDN的数据通信服务主要采用______。
描述计算机网络中数据通信的基本技术参数是数据传输速率与
浏览器通常由一系列的客户单元、一系列的【 】单元和一个控制单元组成。
关于PC机软件的描述中,以下说法错误的是
多媒体技术中的唇同步是指【 】与音频流的同步。
目前,保证电子邮件安全的方式是使用【 】。
随机试题
寒痰凝滞,胸阳不宜,胸痹作痛当选用下列何药()(2001年第30题)
肝硬化门脉高压患者,出现全血细胞减少最主要的原因是
室内空气污染物甲醛的主要来源是
对诊断原发性肝癌具有较高特异性的检查是
婴儿体内含水量较成人相对多,其主要增多部分是
甲公司是一家汽车制造企业,每年需要M零部件20000个,可以自制或外购。自制时直接材料400元/个,直接人工100元/个,变动制造费用200元/个,固定制造费用150元/个。甲公司有足够的生产能力,如不自制,设备出租可获得年租金400000元。甲公司选择外
课堂教学工作的中心是()。
根据班杜拉的自我功效论,影响自我效能感的因素有()。
WhoisPatWilliams?
Readthearticlebelowaboutcorporateculture.Foreachquestion(31-40),writeonewordinCAPITALLETTERSonyourAnswerS
最新回复
(
0
)