计算机等级考试三级C语言上机试题南开100题.pdf

全国计算机等级考试三级C语言程序设计上机考试习题集(南开100题)题目1请 编 写 一 个函数jsValue(intm,intk,int XX口)，该函数的功能是：将大于整数m 且紧靠m 的 k 个素数存入数组xx传回。最后调用函数writeDat()读 取 10组数据，分别得出结果且把结果输出到文件out.dat中。部分源程序存在文件progl.c中。例如：若输入17 5 则应输出：19,23,29,31,37。请勿改动主函数main。和写函数writeDat。的内容。#include#include void readwriteDat();int isP(int m)(inti;for(i=2;i0;m+)if(isP(m)xxs+=m;k-;main()int m,n,xx1000;clrscr();printf(,nPlease enter two integers:*1);scanf(%d%dn,&m,&n);num(m,n,xx);fbr(m=0;mn;m+)printf(M%d,xxm);printf(nnH);readwriteDat();void readwriteDat()int m,n,xx1000,i;FILE*rf,*wf;rffbpen(Hin.datn,r);wf=fopen(,out.dat,；,w);for(i=0;i 1 0;i+)fscanf(rf,%d%d,&m,&n);num(m,n,xx);fbr(m=O;m n;m+)fprintf(wf,n%d H,xxm);fprintf(wf；,n);fclose(rf)；fclose(wf);一#include void jsValue(int m,int k,int xx)int iJ,s=0;for(i=m+1;k0;i+)for(j=2;ji;j+)if(i%j=O)break;if(i=j)xxs+=i;k-;)main()int m,n,zz1 0 0;printff n请输入两个整数：”)；scanf(%d%dn,&m,&n);jsValue(m,n,zz);fbr(m=O;m n;m+)printf(M%d n,zzm);printf(un);writeDat();writeDat()int m,n,zz1 0 0,i；FILE*in,*out;in=fbpen(*,in.datn,T,)；out=fbpen(,out.dat,w);fbr(i=0;i 1 0;i+)fscanf(in,M%d%d,&m,&n);jsValue(m,n,zz);fdr(rn=0;rn n;rn+)fprintf(out/,%d ,zzm);fprintf(out,nn);fclose(in);fclose(out);-*题目2已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存入数组a 中，请考生编制一函数jsV al(),其功能是：如果四位数各位上的数字均是0 或 2 或 4 或 6 或 8,则统计出满足此条件的个数e n t,并把这些四位数按从大到小的顺序存入数组b 中。最后main()函数调用写函数writeDat。把结果ent以及数组b 中符合条件的四位数输出到OUT.DAT文件中。注意：部分源程序存在文件progl.c中。程序中已定义数组：a200,b200,已定义变量：ent请勿改动数据文件IN.DAT中的任何数据、主函数main。、读函数readDat。和写函数writeDat。的内容。#include#define MAX 200int aMAX,bMAX,ent=0;void jsVal()int ij,qw,bw,sw,gw;for(i=0;iMAX;i+)qw=aiJ/1000;bw=ai/100%10;sw=ai%100/10;gw=ai%10;if(qw&qw%2=0&bw%2=0&sw%2=0&gw%2=0)bcnt+=ai;)for(i=0;icnt-1;i+)for(j=i+l;jcnt;j+)if(bibj)qw=bi;bi=bj;bj=qw;void readDat()(in ti;FILE*fp;fp=fopen(Hin.datn,V);fbr(i=0;i MAX;i+)fscanf(fp,M%dn,&ai);fclose(fp);void main()(inti;readDat();jsVal();printff 满足条件的数=%dn”,ent);for(i=0;i ent;i+)printf(M%d”,bi);printf(nnn);writeDat();writeDat()FILE*fjp;int i;fp=fopen(nout.datr,w);fprintf(fp,%dn,ent);fbr(i=0;i ent;i+)fprintf(fp,n%dn,bi);fclose(fp);题目3函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组x x 中；请编制函数StrOR(),其函数的功能是：以行为单位依次把字符串中所有小写字母。左边的字符串内容移到该串的右边存放，然后把小写字母。删除，余下的字符串内容移到已处理字符串的左边存放，之后把已处理的字符串仍按行重新存入字符串数组x x 中。最后main。函数调用函数WriteDat()把结果xx输出到文件OUT5.DAT 中。例如：原文：n any field.Yu can create an indexyou have the correct record.结果：n any field.Yu can create an indexrd.yu have the crrect rec原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。注意：部分源程序存放在文件progl.c中。请勿改动主函数main。、读数据函数ReadDat()和输出数据函数WriteDat。的内容。#include#include#include char xx5080;int maxline=0;/*文章的总行数*/int ReadDat(void);void WriteDat(void);void StrOR(void)int i,rightoj,s,k;char tem80;for(i=0;i=0;j-)k=0;memset(tem,0,80);if(xxij=to,)righto=j;for(s=righto+l;sstrlen(xxi);s+)temk+=xxis;for(s=0;srighto;s+)if(xxis!=,o,)temk+=xxis;strcpy(xxi,tem);)else continue;void main()(clrscr();if(ReadDat()printf(数据文件IN.DAT不能打开!n007”);return;StrOR();WriteDat();int ReadDat(void)FILE*fp;int i=0;char*p;if(fp=fbpen(MIN.DATn,r)=NULL)return 1 ;while(fgets(xxi,80,fp)!=NULL)p=strchr(xxi,X n1);if(p)*p=0;i+；)maxline=i;fclose(fp);return 0;void WriteDat(void)FILE*fp;int i;clrscr();fjp=fopen(nOUT5.DAT,nwn);fbr(i=0;i maxline;i+)printff%sn”，xxi);fprintf(fp,%snn,xxi);fclose(fp);解法二：void StrOR(void)int i;char a80,*p;for(i=0;imaxline;i+)p=strchr(xxi/of);while(p)memset(a,0,80);memcpy(a,xxi,p-xxi);strcpy(xxi,p+l);strcat(xxi,a);p=strchr(xxi/o*);题目4函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组x x 中，请编制函数StrOL(),其函数的功能是：以行为单位对行中以空格或标点符号为分隔的所有单词进行倒排。最后把已处理的字符串(应不含标点符号)仍按行重新存入字符串数组x x 中，最后调用函数writeDat()把结果xx输出到文件OUT6.DAT中。例如：原文：You He MeI am a student.结果：Me He Youstudent a am I原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。部分源程序存在文件progl.c中。请勿改动主函数main。、读数据函数ReadDat。和输出数据函数writeDat()的内容。#include#include#include#include char xx5080;int maxline=0;/*文章的总行数*/int ReadDat(void);void WriteDat(void);void StrOL(void)int ij,k,s,m9strl;char str80;for(i=0;i=0;j)if(isalpha(xxijj)k+;else for(m=l;m=k;m+)strs+=xxij+m;k=0;)if(!isalpha(xxijj)strs+J=*)for(m=l;m=k;m+)strs+=xxij+m;strs=,0,;strcpv(xxi,str);)void main()clrscr();ifi(ReadDat()printf(数据文件IN.DAT不能打开！n007);return;StrOL();WriteDat();int ReadDat(void)FILE*fp;int i=0;char*p;if(a=fbpen(”IN.DAT“Jr)=NULL)return 1;while(fgets(xxi,80,fp)!=NULL)p=strchr(xxiAn,);if(p)*p=O;i+;)maxline=i;fclose(fp);return 0;void WriteDat(void)FILE*fp;int i;clrscr();用=fbpen(OUT6.DAT”Jw);for(i=O;imaxline;i+-i-)printf(H%sn,xxi);fprintf(fp,H%sn,xxi);fclose(fp);void StrOL(void)(int i,j;char word21,yy80J,zz80,*p;for(i=0;i maxline;i+)P=xxi;j=0；memset(word,0,21);memset(yy,0,80);while(*p)if(isalpha(*p)wordj+=*p+;if(*p)continue;)strcpy(zz,yy);sprintf(yy,M%s%sH,word,zz);j=0；memset(word,0,21);while(*p&(!isalpha(*p)p+;)strcpy(xxi,yy);题目5在文件in.dat中有200个正整数，且每个数均在1000至 9999之间。函数ReadDat()读取这200个数存放到数组a a 中。请编制函数jsSort(),其函数的功能是：要求按每个数的后三位的大小进行升序排列，然后取出满足此条件的前10个数依次存入数组b b 中，如果后三位的数值相等，则按原先的数值进行降序排列。最后调用函数WriteDat。把结果bb输出到文件out.dat中。例：处理前 6012 5099 9012 7025 8088处理后 9012 6012 7025 8088 5099部分源程序存在文件progl.c中。请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WritcDat。的内容。#include#include#include int aa200,bb10;void jsSort()(int ij,data;for(i=0;i199;i+)for(j=i+l;jaaj%1000llaai%1000=aaj%1000&aaiaarj)data=aai;aai=aaj;aaj=data;for(i=0;i10;i+)bbil=aai;void main()(readDat();jsSort();writeDat();readDat()(FILE*in;int i;in=fopen(nin.dat,T,);fbr(i=O;i200;i+)fscanf(in,n%d,n,&aai);fclose(in);writcDat()FILE*out;int i;clrscr();out=fbpen(,out.datn,w);for(i=0;i10;i+)printf(M%d,bbi);mrintf(outj%dn”,bbi)；fclose(out);题目6在文件in.dat中有200个正整数，且每个数均在1000至 9999之间。函数ReadDat()读取这200个数存放到数组a a 中。请编制函数jsSort(),其函数的功能是：要求按每个数的后三位的大小进行降序排列，然后取出满足此条件的前10个数依次存入数组b 中，如果后三位的数值相等，则按原先的数值进行升序排列。最后调用函数WriteDat。把结果bb输出到文件out.dat中。例：处理前 9012 5099 6012 7025 8088处理后 5099 8088 7025 60129012注意：部分源程序已给出。请勿改动主函数main。、读数据函数ReadDat()和输出数据函数WriteDat()的内容。#include#include#includeint aa200,bb10;void jsSort()(int ij,data;for(i=0;i199;i+)for(j=i+l;j200;j+)if(aai%1000aaj)data=aai;aai=aaj;aaj=data;for(i=0;i10;i+)bbi=aai;void main()rcadDat();jsSort();writeDat();system(pausen);rcadDat()(FILE*in;int i;in=fbpen(,in.dat,7,rM);fbr(i=O;i200;i+)fscanf(in,n%d,M,&aai);fclose(in);writcDatQFILE*out;int i;clrscr();out=fbpen(,out.dat，V，w);fbr(i=O;i10;i+)printf(”i=%d,%dn”,i+l,bbi);为 rintf(out,dn”,bbi);fclose(out);题目7已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm（字符型4 位），产品名称me（字符型10位），单价dj（整型），数量si（整型），金额je（长整型）五部分组成。其中：金额=单价*数量计算得出。函数ReadDat。是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat。，其功能要求：按产品代码从大到小进行排列，若产品代码相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat（）把结果输出到文件OUT6.DAT中。部分源程序存在文件progl.c中。请勿改动主函数main。、读数据函数ReadDat。和输出数据函数WriteDat（）的内容。#includc#include#include#include#include#define MAX 100typedef struct char dm5;/*产品代码*/char 产品名称*/int dj;/*单价*/int si;/*数量*/long je;/*金额*/PRO;PRO sellfMAX;void ReadDat();void WriteDat();void SortDat()int IJ;PRO xy;for(I=0;I99;I+)for(j=I+l;j100;j+)if(strcmp(seIlI.dm9sellj.dm)Ollstrcmp(sellI.din9sellj.dm)=O&sellI.jesellj.je)xy=sellI;sell I=sellj;sellj=xy;)void main()memset(sell,0,sizeof(sell);ReadDat();SortDat();WriteDat();void ReadDat()FILE*fp;char str80,chl 1;int i;fp=fbpen(,IN.DATn；,rn);fbr(i=O;il 00;i+)fgets(str,80,fp);memcpy(selli.dm,str,4);memcpy(selli.mc,str+4,10);memcpy(ch,str+14,4);ch4=0;selli.dj=atoi(ch);memcpy(ch,str-i-18,5);ch5=0;selli.sl=atoi(ch);selli.je=(long)selli.dj*selli.sl;fclose(fp);void WriteDat(void)FILE*fp;int i;m=fdpen(OUT6.DAT“Jw)；for(i=0;i100;i+)printf(n%s%s%4d%5d%5dnH,selli.dm,selli.mc,selli.dj,selli.sl,selli.je);fprintf(fp,H%s%s%4d%5d%5dn”,selli.dm,selli.mc,selli.dj,selli.sl,selli.je);fclose(fp);题目8函数ReadDat。实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组x x 中；请编制函数encryptChar(),按给定的替代关系对数组x x 中的所有字符进行替代，仍存入数组x x 的对应的位置上，最后调用函数WriteDat。把结果xx输出到文件PS1.DAT中。替代关系：f(p)=p*ll mod256(p 是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果计算后f(p)值小于等于32或大于1 3 0,则该字符不变，否则将f(p)所对应的字符进行替代。部分源程序存在文件progl.c中。原始数据文件存放的格式是：每行的宽度均小于80个字符。请勿改动主函数main。、读数据函数ReadDat。和输出数据函数WrilcDat()的内容。#include#includc#include#include unsigned char xx5080;int maxline=0;/*文章的总行数*/int ReadDat(void);void WriteDat(void);void encryptChar()intij;fbr(i=O;imaxline;i+)for(j=0;jstrlen(xxi);j+)if(xxij*ll%256130)continue;else xxij=xxij*ll%256;void main()clrscr();ifi(ReadDat()printfC数据文件ENG.IN不能打开!n007);return;encryptChar();WriteDat();int ReadDat(void)(FILE*fp;int i=0;unsigned char*p;if(fp=fbpcn(,eng.inn,Mr,)=NULL)return 1;while(fgets(xxi,80,fp)!=NULL)p=strchr(xxin*);if(p)*p=O;i+；)maxline=i;fclose(fp);return 0;void WriteDat(void)FILE*fp;int i;fp=fopen(Hpsl.dat,wM);fbr(i=O;imaxline;i+)printftH%snn,xxi);fprintf(fp,M%sn,xxi);)fclose(fp);题目9函数ReadDat。实现从文件IN.DAT中读取一篇英文文章存入到字符串数组x x 中，请编制函数SortCharD(),其函数的功能是：以行为单位对字符按从大到小的顺序进行排序，排序后的结果仍按行重新存入字符串数组x x 中，最后调用函数writeDat。把结果xx输出到文件OUT2.DAT中。例：原文：dAc,BfC.CCbbAA结果：fedCBA.bbCCAA原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。部分源程序存在文件progl.c中。请勿改动主函数main。、读数据函数ReadDat()和输出数据函数writeDat。的内容。#include#include#include char xx5080;int maxline=0;/*文章的总行数*/int ReadDat(void);void WriteDat(void);void SortCharD(void)int IJ,k,strl;char ch;for(I=0;Imaxline;I+)strl=strlen(xxI);for(j=0;jstrl-l;j+)for(k=j+l;kstrl;k+)if(xxILjxxIk)ch=xxIJj;xxIj=xxIk;xxIk=ch;void main()(clrscr();if(RcadDat()printf(数据文件IN.DAT不能打开!n007);return;SortCharD();WriteDatQ;int ReadDat(void)(FILE*fp;int i=0;char*p;ifUg=fbpen(”IN.DAT“JT)=NULL)return 1;while(fgets(xxi,80,fp)!=NULL)p=strchr(xxiAn,)；if(p)*p=0;i+;)maxline=i;fclose(fp);return 0;void WriteDat(void)FILE*fp;int i;m=fbpen(“0UT2.DAT”Jw);fbr(i=O;imaxline;i+)printf(M%sn,xxi);fprintf(fp,n%sn,xxi);fclose(fp);T题目10函数ReadDatO实现从文件IN.DAT中读取篇英文文章存入到字符串数组XX中，请编制函数ConvertCharA(),其函数的功能是：以行为单位把字符串中的所有小写字母改写成该字母的下一个字母，如果是字母z,则改写成字母a。大写字母仍为大写字母，小写字母仍为小写字母，其他字符不变。把已处理的字符串仍按行重新存入字符串数组x x 中，最后调用函数writeDat()把结果xx输出到文件OUT1.DAT 中。例：原文：Adb.Bcdzaabck.LLhj结果：Aec.Bdeabbcdl.LLik原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。部分源程序存在文件progl.c中。请勿改动主函数main。、读数据函数ReadDat()和输出数据函数writeDat()的内容。#include#include#include char xx5080;int maxIine=0;/*文章的总行数*/int ReadDat(void);void WriteDat(void);void ConvertCharA(void)int ij;for(i=0;imaxline;i+)for(j=0;j=1a*&xxijjpen(OUTLDAT”,W);for(i=0;imaxline;i+)printf(H%sn,xxi);fprintf(fp,n%sn,xxi);fclose(fp);L题目11程序progl.c的功能是：把 s 字符串中的所有字母改写成该字母的下一个字母，字母z 改写成字母a。要求大写字母仍为大写字母，小写字母仍为小写字母，其它字符不做改变。请考生编写函数chg(char*s)实现程序要求，最后调用函数readwriteDAR)把结果输出到文件be 1.out 中。例如：s 字符串中原有的内容为：M n.l23Zxy,则调用该函数后，结果为：No.l23Ayzo注意：部分源程序存在文件progl.c文件中。请勿改动主函数main()和输出数据函数readwriteDAT。的内容。#include#include#include#includc#define N 81void readwriteDAT();void chg(char*s)while(*s)if(*s=,zll*s=,Z,)*s-=25;s+;else if(*s=,a*&*s=,A,&*s=tY,)*s+=l;s+;else s+;main()char aN;clrscr();printfifTnter a string:)；gets(a);printf(nThe original string is:)；puts(a);chg(a);printff The string after modified:)；puts(a);readwriteDAT();void readwriteDAT()|int i;char aN;FILE*rf,*wf;rf=fopen(bcl.in,V);wf=fbpen(,bcl.ouf,nwn);for(i=0;i 5 0;i+)fscanf(rf,%sn,a);chg(a);fprintf(wf,n%snn,a);fclose(rf);fclose(wf);题目12已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm（字符型4 位），产品名称me（字符型10位），单价dj（整型），数量si（整型），金额je（长整型）五部分组成。其中：金额=单价*数量计算得出。函数ReadDat（）是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat。，其功能要求：按产品名称从小到大进行排列，若产品名称相等，则按金额从小到大进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat（）把结果输出到文件OUT5.DAT中。部分源程序存在文件progl.c中。请勿改动主函数main。、读数据函数ReadDat。和输出数据函数WritcDat（）的内容。#include#include#include#include#include#define MAX 100typedef struct char dm5;/*产品代码*/char mcU;/*产品名称*/int dj;/*单价*/int si;/*数量*/long je;/*金额*/PRO;PRO sellMAX;void ReadDat();void WriteDat();void SortDat()int I J;PRO xy;for(I=0;I99;I+)for(j=I+l;jOllstrcmp(sellfIl.mc,sellj.mc)=O&sellIl.jesellj.je)xy=sellI;sellI=sellj;sellj=xy;void main()memset(sell,0,sizeof(sell);ReadDat();SortDat();WriteDat();void ReadDat()FILE*fp;char str8O,chll;int i;fp=fopen(nIN.DATH,nrn);fbr(i=O;il 00;i+)fgets(str,8O,fp);memcpy(selli.dm,str,4);memcpy(selli.mc,str+4,10);memcpy(ch,str+14,4);ch4=0;selli.dj=atoi(ch);memcpy(ch,str-i-18,5);ch5=0;selli.sl=atoi(ch);selli.je=(long)selli.dj*selli.sl;fclose(fp);void WriteDat()FILE*fp;int i;fp=fopen(nOUT5.DATn,nwn);fbr(i=0;i100;i+)printf(%s%s%4d%5d%5dnn,selli.dm,selli.mc,selli.dj,selli.sl,selli.je);fprintf(fp,n%s%s%4d%5d%5dnn,selli.dm,selli.mc,selli.dj,selli.sl,selli.je);fclose(fp);题 目 13（按金额从小到大进行排列）已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm（字符型4 位），产品名称me（字符 型 10位），单价dj（整型），数量si（整型），金额je（长整型）五部分组成。其中：金额=单价*数量计算得出。函数ReadDat。是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat（）,其功能要求：按产品代码从小到大进行排列，若产品代码相等，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WritcDat（）把结果输出到文件OUT9.DAT中。部分源程序存在文件progl.c中。请勿改动主函数main。、读数据函数RcadDat。和输出数据函数WritcDat。的内容。#include#include#includc#include#include#define MAX 100typedef struct char dm5;/*产品代码*/(2门年11;/*产品名称*/int dj;/*单价*/int si;/*数量*/longje;/*金额*/PRO;PRO sellfMAX;void ReadDat();void WriteDat();void SortDat()int I J;PRO xy;for(I=0;I99;I+)forg=I+l;jOllstrcmp(sellI.dm,sellj.dm)=O&sellI.jesellj.je)xy=sellI;sellIJ=sellj;selIjJ=xy;void main()memset(sell,0,sizeoflsell);ReadDat();SortDat();WriteDat();void ReadDat()(FILE*fp;char str80,chll;int i;fp=fbpen(nIN.DATH,V);fbr(i=0;i100;i+)fgets(str,80,fp);memcpy(selli.dm,str,4);memcpy(selli.mc,str+4,10);memcpy(ch,str+l 4,4);ch4=0;selli.dj=atoi(ch);memcpy(ch,str+18,5);ch5=0;selli.sl=atoi(ch);selli.je=(long)selli.dj*selli.sl;fclose(fp);void WriteDat()FILE*fp;int i;fp=fbpen(OUT9.DAT,nwn);fdr(i=0;i 100;i+)printf(H%s%s%4d%5d%5dnM,selli.dm,selli.mc,selli.dj,selli.sl,selli.je);fprintf(fp,H%s%s%4d%5d%5dnH,selli.dm,selli.mc,selli.dj,selli.sl,selli.je);fclose(fp);题 目 14已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存入数组a 中，请考生编制一函数jsV al(),其功能是：依次从数组a 中取出一个四位数，如果该四位数连续大于该四位数以后的五个数且该数是奇数(该四位数以后不满五个数，则不统计)，则统计出满足此条件的个数ent并把这些四位数按从小到大的顺序存入数组b 中，最后调用写函数writeDat()把结果ent以及数组b 中符合条件的四位数输出到OUT.DAT文件中。注意：部分源程序存在文件progl.c中。程序中已定义数组:a200,b200,已定义变量：ent请勿改动数据文件IN.DAT中的任何数据、主函数main。、读函数readDat()和写函数writeDat。的内容。#include#define MAX 200int aMAX,bMAX,ent=0;void jsVal()intfor(I=0;IMAX-5;I+)for(j=I+l;jaj&aI%2)flag=l;else flag=0;break;)if(flag=l)bcnt=aI;cnt+;)for(I=0;Icnt-l;I+)for(j=I+l;jbj)flag=bI;bI=bU;bU=flag;void readDat()int i;FILE*fjp;fp=fopen(nin.datM,HrM);fbr(i=0;i MAX;i+)fscanf(fp,n%d&ai);fclose(fp);void main()int i;readDat();jsVal();printf(满足条件的数=%dn”,ent);fbr(i=0;i ent;i+)printf(n%d”,bi);printf(nn);writcDat();writeDat()FILE*fp;in ti;fp=fbpen(nout.datH,Hw);fprintf(fp,%dn,ent);fdr(i=0;i ent;i+)fprintf(fp,n%dn,bi);fclose(fp);题 目 15一知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存入数组a 中，请考生编制一函数jsV al(),其功能是：若个四位数的千位数字上的值小于等于百位数字上的值，百位数字上的值小于等于十位数字上的值，以及十位数字上的值小于等于个位数字上的值，并且原四位数是偶数，则统计出满足此条件的个数ent并把这些四位数按从小到大的顺序存入数组b 中，最后调用写函数writeDat()把结果ent以及数组b 中符合条件的四位数输出到OUT.DAT文件中。注意：部分源程序存在文件progl.c中。程序中已定义数组：a200,b200,已定义变量：ent请勿改动数据文件IN.DAT中的任何数据、主函数main。、读函数readDat()和写函数writeDat()的内容。#include#define MAX 200int aMAX,bMAX,cnt=0;void jsVal()int IJ；int qw,bw,sw,gw;for(I=0;IMAX;I+)qw=al/1000;bw=aI%1000/100;sw=aI%100/10;gw=aI%10;if(qw=bw)&(bw=sw)&(sw=gw)&(aI%2=0)bcnt+=aI;)for(I=0;Icnt-l;I+)for(j=I+l;jbj)qw=bI;bI=bj;bj=qw;void readDat()int i;FILE*fp;fp=fbpen(,in.datM,Hrn);fbr(i=0;i MAX;i+)fscanf(fp,M%dH,&ai);fclose(fp);void main()int i;readDat();jsVal();printf(满足条件的数=%dn”,ent);fbr(i=0;i ent;i+)printf(n%d,bi);printf(nn);writeDat();writeDat()(FILE*fp;int i;fp=fbpen(nout.datH,nw);fprintf(fp,%dn,ent);for(i=0;i ent;i+)fprintf(fp,n%dn,bi);fclose(fp);题目16函数ReadDat()实现从文件IN.DAT