- 1、本文档共29页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
1998年9月全国计算机等级考试c语言上机试题含答案
1998年9全国计算机等级考试上机试题含答案
/*PROG1 已知在文件IN.DAT中存有若干个(个数200)四位数字的正整数,
函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue(),
其功能要求:1、求出这文件中共有多少个正整数totNum;2、求出这些数中的
各位数字之和是偶数的数的个数totCnt,以及满足此条件的这些数的算术平均
值totpjZ,最后调用函数WriteDat()把所求的结果输出到文件OUT2.DAT中。
注意:部分部分源程序存放在PROG1.C中。
请勿改动主函数main(),读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/
#include stdio.h
#include conio.h
#define MAXNUM 200
int xx[MAXNUM] ;
int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */
int totCnt = 0 ; /* 符合条件的正整数的个数 */
double totPjz = 0.0 ; /* 平均值 */
int ReadDat(void) ;
void WriteDat(void) ;
void CalValue(void)
{ int i;
int a,b,c,d;
double sum=0;
for (i=0;iMAXNUM;i++)
if (xx[i]0)
{
totNum++;
a=xx[i]/1000;
b=xx[i]/100-a*10;
c=xx[i]/10-a*100-b*10;
d=xx[i]%10;
if((a+b+c+d)%2==0)
{totCnt++;
sum=sum+xx[i];
}
}
totPjz=sum/totCnt;
}
void main()
{
clrscr() ;
if(ReadDat()) {
printf(数据文件IN.DAT不能打开!\007\n) ;
return ;
}
CalValue() ;
printf(文件IN.DAT中共有正整数=%d个\n, totNum) ;
printf(符合条件的正整数的个数=%d个\n, totCnt) ;
printf(平均值=%.2lf\n, totPjz) ;
WriteDat() ;
}
int ReadDat(void)
{
FILE *fp ;
int i = 0 ;
if((fp = fopen(in.dat, r)) == NULL) return 1 ;
while(!feof(fp)) {
fscanf(fp, %d,, xx[i++]) ;
}
fclose(fp) ;
return 0 ;
}
void WriteDat(void)
{
FILE *fp ;
fp = fopen(OUT2.DAT, w) ;
fprintf(fp, %d\n%d\n%.2lf\n, totNum, totCnt, totPjz) ;
fclose(fp) ;
}
2./*PROG2 已知在文件IN.DAT中存有若干个(个数200)四位数字的正整数,
函数ReadDat()是读取这若干个正整数并存入数组XX中。请编制函数CalValue(),
其功能要求:1、求出这文件中共有多少个正整数totNum;2、求出这些数右移
1位后,产生的新数是偶数的数的个数totCnt,以及满足此条件的这些数(右移
前的值)的算术平均值totpjZ,最后调用函数WriteDat()把所求的结果输出到
文件OUT4.DAT中。
注意:部分部分源程序存放在PROG2.C中。
请勿改动主函数main(),读数据函数ReacdDat()和输出数据函数WriteDat()的内容。*/
#include stdio.h
#include conio.h
#define MAXNUM 200
int xx[MAXNUM] ;
int totNum = 0 ; /* 文件IN.DAT中共有多少个正整数 */
int totCnt = 0 ; /* 符合条件的正整数的个数 */
double totPjz = 0.0 ; /* 平均值 */
int ReadDat(void) ;
void WriteDat(void) ;
void CalValue(void)
{ int i,s;
double sum=0;
for (i=0;iMAXNUM;i++)
if (xx[i]0)
{ totNum++;
s=xx[i];
s=s1;
if ((s%2)==0)
{
totCnt++;
sum=sum+xx[i];
}
}
totPjz=sum/totCnt;
}
void main()
{
clrscr() ;
您可能关注的文档
- 教学案例《掌声》.docx
- 教学案例《美丽的小兴安岭》.docx
- 教学反思-位置与方向.docx
- 教学基本信息 课题 人教版 作者及工作单位 周洋 重庆市渝南田家炳.docx
- 教学设计 俄罗斯.docx
- 教学设计把铁路修到拉萨去.docx
- 教学设计_认识长度单位 —— 毫米.docx
- 教学设计聪明的机器人.docx
- 教学设计真情的回报.docx
- 教员节乡镇引you讲话03.doc
- 南阳市卧龙区2024年春期进校园公开招聘教师(河师大)笔试高频难、易错点备考题库及参考答案详解1套.docx
- 马原活动策划方案.docx
- 南阳市卧龙区2024年春期进校园公开招聘教师(河师大)笔试高频难、易错点备考题库及参考答案详解.docx
- 南阳市卧龙区2024年春期进校园公开招聘教师(河师大)笔试高频难、易错点备考题库参考答案详解.docx
- 核医学设备创新与临床应用.pptx
- 马云创业策划文案.docx
- 马原视频策划文案.docx
- 台州市黄岩区环境保护监测站编外人员招聘笔试备考题库参考答案详解.docx
- 台州市自然资源和规划局招聘编制外劳动合同用工笔试高频难、易错点备考题库含答案详解.docx
- 肯耐珂萨人才盘点分享(49页PPT).pptx
文档评论(0)