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

《计算机考试三级C语言上机100题.pdf》由会员分享，可在线阅读，更多相关《计算机考试三级C语言上机100题.pdf（145页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、全国计算机等级考试三级C语言上机100题题 目 1请编写一个函数jsVakie(int m,int k,int x x),该函数的功能是：将大于整数m 且紧靠m 的 k 个素数存入数组xx传回。最后调用函数writeDat。读 取 10组数据，分别得出结果且把结果输出到文件out.dat中。部分源程序存在文件progl.c中。例 如:若 输 入 1 7 5 则应输出：19,23,29,31,37。请勿改动主函数main()和写函数writeDat()的内容。/include#includevoid readwriteDat();int isP(int m)(int i;fbr(i=2;i0;m

2、-H-)if(isP(m)xxs-H-=m;k;main()int m,n,xx1000;clrscr();printffWPlease enter two integers:1);scanf(,%d%d,&m,&n);num(m,n,xx);fbr(m=0;mN;M-H-)printf(H%d n,xxm);printfCV);readwriteDat();void rcadwritcDat()int m,n,xx1000,i;FILE*rf,*wf;rf=fbpen(,in.dat，7，rn);wf=fbpen(,out.dat,wn);fbr(i=0;i10;i+)fscanf(rf；n

3、%d%d”,&m,&n);num(m,n,xx);fbr(m=O;m)fclose(rf)；fclose(wf);题目2已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存入数组a中，请考生编制一函数jsVal。，其功能是：如果四位数各位上的数字均是。或2或4或6或8,则统计出满足此条件的个数e n t,并把这些四位数按从大到小的顺序存入数组b中。最后main()函数调用写函数writeDat。把结果ent以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意：部分源程序存在文件progl.c中。程序中已定义数组：a200,b200,已定义变量：ent

4、请勿改动数据文件IN.DAT中的任何数据、主函数main。、读函数readDat()和写函数writeDat()的内容。#include#dcfmc MAX 200int aMAX,bMAX,ent=0;void jsVal()int ij,qw,bw,sw,gw;fbr(i=0；iMAX;I+)q-ai/1000;bw=ai/100%10;sw=ai%l00/10;gw=ai%10;if(qw&qw%2=0&bw%2=0&sw%2=0&gw%2=0)bcnt-H-=ai;fbr(i=0;iCNT-l;I+)fbr(j=i+l;jvCNT;J+)iftbi void rcadDat()inti

5、;FILE*fp;fp=fbpcn(,in.datM,r);fbr(i=0;i MAX;i-H-)fscanfiffp,&ai);f c l o s e(f p);v o i d m a i n()i n t i;r e a d D a t();j s V a l();p r i n t f C满足条件的数=%d n ,e n t);f b r(i =0 ;i e n t;i-H-)p r i n氓 d ”,b i );p r i n t f f n );w r i t e D a t();w r i t e D a t()F I L E *f p ;i n t i;f p =f o p e

6、n(no u t.d a t w *);f p r i n t Rf p,n%d nM,e n t);f d r(i =0 ;i =O;j)k=0;memset(tem,0,80);if(xxij=,o,)righto=j;for(s=righto+1 ;stemk+=xxis;nfbr(s=0;sif(xxis!=b)temk+=xxis;strcpy(xxi,tem);)else continue;void main()clrscr();if(RcadDat()printff数据文件IN.DAT不能打开!n007);return;)StrOR();WriteDat();int RcadDa

7、t(void)FILE*fp;int i=0;char*p;=fbpcn(IN.DAT;V)=NULL)return 1 ;while(fgets(xxi,80,fp)!=NULL)p=strchr(xxi,V);iRp)*p=0;i+;maxline=i;fclose(fp);return 0;)void WriteDat(void)FILE*ip;int i;clrscr();fp=fbpen(MOUT5.DATn,nwH);fdr(i=0;i maxline;i+)printfC，%sn xxi);xxi);)fclose(fp);*题目4函数ReadDat()实现从文件IN.DAT中读

8、取一篇英文文章存入到字符串数组xx+，请编制函数StiO L(),其函数的功能是：以行为单位对行中以空格或标点符号为分隔的所有单词进行倒排。最后把己处理的字符串(应不含标点符号)仍按行重新存入字符串数组x x 中，最后调用函数wrileDat()把结果 xx输出到文件0UT6.DAT中。例如:原文：You He MeI am a student.结果：Me He Youstudent a am I原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。部分源程序存在文件progl.c中。请勿改动主函数main。、读数据函数ReadDat()和输出数据函数writeDat()的内

9、容。#include#include#includc#includechar xx5080;int maxlinc=0;/*文章的总行数*/int RcadDat(void);void WriteDat(void);void StrOL(void)int i,j,k,s,m,strl;char str80;fdr(i=O;i=Oj-)if(isalpha(xxij)k+;else fbr(m=1 ;m=k;m-H-)strs+=xxij+m;k=0;)if(!isalpha(xxiO)strs+-r;fbr(m=1 ;m=k;m+)strs-H-=xxij+m;strs=,0,;strcpy(

10、xxi,str);)void main()clrscr();i*RcadDat()prints”数据文件IN.DAT不能打开！n007M);return;)StrOL();WriteDat();int RcadDat(void)FILE*1p;int i=0;char*p;ifUfp=fbpcnCIN.DAT,MrM)=NULL)return 1;while(fgets(xxi,80,fp)!=NULL)p=strchr(xxi,n,);if(p)*p=O;i+；maxline=i;fclose(fp);return 0;)void WriteDat(void)FILE*fp;int i;cl

11、rscr();m=fbpen(”OUT6.DAT,“w”);fbr(i=0;iM AXLINE;I-H-)printfT%sn”,xxi);Srintf(用 J%sn”,xxi);)fclose(fp);*题 目5在文件in.dat中有200个正整数，且每个数均在1000至9999之间。函数ReadDat()读取这200个数存放到数组aa中。请编制函数jsSort。，其函数的功能是：要求按每个数的后三位的大小进行升序排列，然后取出满足此条件的前10个数依次存入数组b b中，如果后三位的数值相等，则按原先的数值进行降序排列。最后调用函数WritcDat。把结果bb输出到文件out.dat中。例：

12、处理前 6012 5099 9012 7025 8088处理后 9012 6012 7025 8088 5099部分源程序存在文件progl.c中。请勿改动主:函数m ain()读数据函数RcadDat()和输出数据函数WritcDat()的内容。#include#include#includeint aa200,bb10;void jsSort()(int iJ,data;for(i=0；i199;i-H-)fbr(j=i+1 ;jaaj%1000|aai%l 000=aaj%l 000&aaifbr(i=0;i10;i-H-)bbi=aai;void main()readDat();jsS

13、ort();writeDat();readDat()(FILE*in;int i;in=fbpen(,in.dat,rn);fbr(i=O;i200;i+)fscanftin,n%d,;&aai);fclose(in);)write Dat()FILE*out;int i;clrscr();out=fbpen(”out.dat,w);fbr(i=O;i读数据函数RcadDat()和输出数据函数WritcDat。的内容。#include/include/includeint aa200,bbI0;voidjsSort()(int ij,data;fbr(i=0;i199;i-H-)fbr(j=i

14、+l；j200j+)if(aai%1000aaj)data=aai;aai=aaj;aaj=data;fbr(i=0;i10;i+)bbi=aai;)void main()(readDat();jsSort();writeDat();system(pausen);rcadDat()FILE*in;inti;in=fbpen(Min.datM,rM);fbr(i=O;i200;i+)fscanf(in,d,”,&aai);fclosc(in);writeDat()FILE*out;int i;clrscr();out=fbpcn(Hout.dat；wM);fbr(i=O;i10;i+)print

15、f(i=%d,%dnn,i4-l,bbi);fprintfout,%dn,bbi);fclose(out);)*题目7已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位),产品名称me(字符型10位)，单价dj(整型)，数量si(整型)，金额je(长整型)五部分组成。其中：金额=单价*数量计算得出。函数ReadDat。是读取这100个销售记录并存入结构数组sell中。清编制函数SortD at(),其功能要求：按产品代码从大到小进行排列，若产品代码相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat。把结果

16、输出到文件OUT6.DAT中。部分源程序存在文件progl.c中。请勿改动主函数main。、读数据函数ReadDat()和输出数据函数WriteDat。的内容。#include#includeinclude/include#include/define MAX 10()typedef structchar dm5;/*产品代码*/char 产品名称*/int dj;/*单价*/int si;/*数量*/long je;/*金额*/(PRO;PRO sellMAX;void RcadDat();void WriteDat();void SortDat()int ij;PRO xy;fbr(i=0

17、;i99;i+)fbr(j=i+l;j100;j+)if(strcmp(selli.dm,sellj.dm)O|strcmp(selli.dm,sellj.dm)=O&selli.jeSELLJ.JE)xy=selli;sell i=sellj;sellj=xy;void main()|memset(sell0,sizeof(sell);ReadDat();SortDat();WriteDat();)void ReadDat()(FILE*中；char str80,chll;int i;m=fbpen(”IN.DATTT);for(i=0；i100;i+)fgets(str,8O,fp);me

18、mcpy(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 WritcDat(void)FILE*ip;int i;m=fbpen(OUT6.DAT”Jw)；fbr(i=0;i100;i-H-)printfC*%s%s%4d%5d%5dn*selli.dm,selli.mc,selli.

19、dj,selli.sl,seni.je);fpnntnfp；%s%s%4d%5d%5dnM,selli.dm,selli.mc,selli.dj,selli.sl,selli.je);fclosc(fp);*题目8函数ReadDat。实现从文件ENGIN中读取一篇英文文章，存入到字符串数组x x中；请编制函数cncryptChar(),按给定的替代关系对数组x x中的所有字符进行替代，仍存入数组x x的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS1.DAT中。替代关系:flip户p*ll mod 256(p是数组中某一个字符的ASCH值,f(p)是计算后新字符的ASC

20、H值)，如果计算后f(p)值小于等于32或大于1 3 0,则该字符不变，否则将*p)所对应的字符进行替代。(注意中间变量用无符号整型)，部分源程序存在文件progl.c中。原始数据文件存放的格式是：每行的宽度均小于80个字符。请勿改动主函数main。、读数据函数ReadDat。和输出数据函数WriteDat()的内容。#include/include#include#includeunsigned char xx5080;int maxline=0;/*文章的总行数*/int ReadDat(void);void WriteDat(void);void encryptChar()int ij;

21、fbr(i=O;iMAXLINE;I-H-)fbr(j=O;jSTRLEN(XXI);J+)if(xxij*ll%256130)continue;else xxij=xxij*ll%256;void main()(clrscr();ifReadDat()printff数据文件ENGIN不能打开！n007H);return;encryptChar();WritcDat();)int ReadDat(void)(FILE*fp;int i=0;unsigned char*p;iR(m=fbpen(eng.in”;T)=NULL)return 1;while(fgets(xxi,80,fp)!=NU

22、LL)p=strchr(xxiip)*p=0;i+；maxline=i;fclose(fp);return 0;void WriteDat(void)(FILE*fp;int i;fp=fbpenC，psl.dat,wn);fdr(i=O;iMAXLINE;I+)printff%sn”,xxi);mrintf(母 J%sn,xxi);)fclose(fp);*题目9函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组x x 中，请编制函数SortCharD(),其函数的功能是：以行为单位对字符按从大到小的顺序进行排序，排序后的结果仍按行重新存入字符串数组xx+,最后调

23、用函数writeDat()把结果xx输出到文件OUT2.DAT中。例：原 文:dAe,BfC.CCbbAA结果：fbdCBA.bbCCAA原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。部分源程序存在文件progl.c中。请勿改动主函数main。、读数据函数ReadDat。和输出数据函数writcDat。的内容。#include#include#includechar xx5080;int maxlinc=0;/*文章的总行数*/int RcadDat(void);void WriteDat(void);void SortCharD(void)int i,j,k,str

24、l;char ch;fbr(i=O;iMAXLINE;I+)strl=strlen(xxi);fbr(j=O;jSTRL-l;J-F+)fbr(k=j+l；kif(xxijXXIK)ch=xxij;xxij=xxik;xxik=ch;void main()clrscr();if(ReadDat()printfC数据文件IN.DAT不能打开！n007M);return;)SortCharD();WriteDat();int ReadDat(void)FILE*fp;int i=0;char*p;iR(m=fbpen(”IN.DATJr”=NULL)return 1;while(fgets(xxi

25、,80,lp)!=NULL)p=strchr(xxi/n,);if(p)*p=O;i+；maxline=i;fclose(fp);return 0;void WriteDat(void)FILE*fp;int i;fp=fbpen(uOUT2.DATM；,wn);f b r(i=O;i M AX L I N E J-H-)p r i n t f(%s n ,x 疝);f p r i n t f(a，s n”,x x i );)f c lo s e(f p);)*题 f l 1 0函数R e a d D a t()实现从文件I N.D A T中读取一篇英文文章存入到字符申数组xx中，请编制函数C

26、 o n v e r t C h a r A(),其函数的功能是：以行为单位把字符串中的所有小写字母改写成该字母的下一个字母,如果是字母z,则改写成字母a。大写字母仍为大写字母，小写字母仍为小写字母，其他字符不变。把己处理的字符串仍按行重新存入字符串数组xx中，最后调用函数w r i t e D a t。把结果xx输出到文件O U T 1.D A T 中。例：原文：Ad b.B c d z aa b c k.L L h j结果：Ae c.B d e a bb c d L L L i k原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。部分源程序存在文件p r o g l.

27、c中。请勿改动主函数m a i n。、读数据函数R e a d D a t()和 输 数 据 函 数w r i t e D a t。的内容。#i n c lu d e#i n c lu d e#i n c lu d ec h a r x x 5 0 8 0 ;i n t m a x li n c=0;/*文章的总行数*/i n t R c a d D a t(v o i d);v o i d W r i t e D a t(v o i d);v o i d C o n v e r t C h a r A(v o i d)i n t i j;f b r(i=O;i M AX L I N E;I-

28、H-)f o r Q=0;j =a&x x i j =y )x x i j +=l;v o i d m a i n()c lr s c r();i R R e a d D a t()p r i n t f f数据文件I N.D A T不能打开!n 0 0 7 );r e t u r n;)C o n v e r t C h a r A();W r i t e D a t();)i n t R e a d D a t(v o i d)F I L E *f p;i n t i=0;c h a r *p;i f(i p=f b p e n(,I N.D AT ,T,)=N U L L)r e t u

29、 r n 1;w h i le(f g e t s(x x i ,8 0,f p)!=N U L L)p=s t r c h r(x x i ,n );i f(p)*p=O;i+；m a x li n e=i;f c lo s e(f p);r e t u r n 0;v o i d W r i t c D a t(v o i d)F I L E *i p;i n t i;c lr s c r();m=f o p e n(O U T L D AT ,“w”);f b r(i=0;i=,a*&s i =A(二 Y)s i +=l;)m a i n()(c h a r a N ;c l r s c

30、 r ();p r i n t f(E n t e r a s t r i n g :)；g e t s(a);p r i n t f (/zT h e o r i g i n a l s t r i n g i s :)；p u t s (a);c h g (a);p r i n t f (z，T h e s t r i n g a f t e r m o d i f i e d :)；p u t s (a);r e a d w r i t e D A T O ;)v o i d r e a d w r i t e D A T()(i n t i ;c h a r a N ;F I L E

31、*r f,*w f ;r f =f o p e n(b c l.i n,r);w f =f o p e n(b c l.o u t,w)；f o r(i =0;i 50;i+)f s c a n f (r f,%s”,a);c h g (a);f p r i n t f(w f,%s n，a);)f c l o s e(r f);f c 1o s e(w f);)题目12已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4 位)，产品名称me(字符型10位)，单价dj(整型)，数量si(整型)，金额je(长整型)五部分组成。其中：金额=单价*数量计算得出。

32、函数ReadDalO是读取这100个销售记录并存入结构数组s e ll中。请编制函数SorlDat(),其功能要求：按产品名称从小到大进行排列，若产品名称相等，则按金额从小到大进行排列，最终排列结果仍存入结构数组s e ll中，最后调用函数WritcDatO把结果输出到文件0UT5.DAT中。部分源程序存在文件progl.c 中。请勿改动主函数main。、读数据函数ReadDat()和输出数据函数WriteDat()的内容。ttincludettincludettincludettincludettincludettdefine M A X 100typedef stru ctchar dm5

33、;/*产品代码*/char/*产品名称*/int dj;/*单价*/int si;/*数量*/long je;/*金额*/PRO;PRO sellMAX;voi d ReadDat();void Writ eDat();void SortDat()int i,j;PRO xy;fo r(1=0;i99;i+)for(j=i+l;j0 Istrcm p(selli,me,sei 1j.me)=0&sel1i.jesel)xy=selli;selli=sellj;sellj=xy;)void mainO(memset(sell,0,sizeof(se ll);ReadDat();SortDat()

34、;Wri teDat();v o i d R e a d D a t()F I L E *f p;c h a r s t r 80,c h l l ;i n t i;f p=f o p e n(*I N.D A T,r);f o r(i=0;i 100;i+)f g e t s (s t r,80,f p);m e m c p y(s e l l i .d m,s t r,4);m e m c p y(s e l l i .m e,s t r+4,10);m e m c p y(c h,s t r+14,4);c h 4=0;s e l l i .d j=a t o i(c h);m e m

35、c p y(c h,s t r+18,5);c h 5=0;s e l l i .s l=a t o i(c h);s e l l i .j e=(l o n g)s e l l i .d j*s e l l i .s i;)f c l o s e(f p);)v o i d W r i t e D a t ()(F I L E *f p;i n t i;f p=f o p e n(z，0U T 5.D A T”,w)；f o r(i=0;i 100;i+)p r i n t f (z，%s%s%4d%5d%5d n,s e l l i .d m,s e l l i .m e,s e l l

36、i .d j,s e l l i .s i,s e l l i .j e);f p r i n t f (f p,*%s%s%4d%5d%5d n”,s e l l i .d m,s e l l i .m e,s e l l i .d j,s e l l i .s i,s e l l i .je);)f c l o s e(f p);)题目13己知在文件I N.D A T中存有100个产品销售记录，每个产品销售记录由产品代码d m(字符型4位)，产品名称m e(字符型1 0位)，单价d j(整型)，数量s i (整型)，金额j e (长整型)五部分组成。其中：金额二单价*数量计算得出。函数R

37、e a d D a t ()是读取这100个销售记录并存入结构数组s e l l中。请编制函数S o r t D at(),其功能要求：按产品代码从小到大进行排列，若产品代码相等，则按金额从大到小进行排列，最终排列结果仍存入结构数组s e l l中，最后调用函数W r i t e D a t。把结果输出到文件0U T 9.D A T中。部分源程序存在文件p r o g l.c中。请勿改动主函数m a i n。、读数据函数R e a d D a t ()和输出数据函数W r i t e D a t O的内容。#i n c l u d et t i n c l u d e i n c l u d

38、et t i n c l u d et t i n c l u d ef t d e f i n e M A X 100t y p e d e f s t r u c t c h a r d m 5;/*产品代码*/c h a r ;/*产品名称*/i n t d j;/*单价*/i n t s i;/*数量*/l o n g j e;/*金额*/P R O;P R O s e l l M A X ;v o i d R e a d D a t();v o i d W r i t e D a t();v o i d S o r t D a t()(i n t i,j;P R O x y;f o

39、r(i=0;i 99;i+)f o r(j=i+l;j 0 1|s t r c m p(s e i 1 i .d m,s e i 1 j .d m)=0&s e l l i .j e S E L L J .J E)x y=s e l l i ;s e l l i =s e l l j ;s e l l j =x y;)v o i d m a i n O(m e m s e t(s e l l,0,s i z e o f(s e l l);R e a d D a t ();S o r t D a t ();W r i t e D a t ();)v o i d R e a d D a t()(F

40、 I L E *f p;c h a r s t r 80,c h 11;i n t i;f p=f o p e n(*I N.D A T,r);f o r(i=0;i 100;i+)f g e t s(s t r,80,f p);m e m c p y (s e l l i .d m,s t r,4);m e m c p y(s e l l i .m e,s t r+4,10);m e m c p y(c h,s t r+14,4);c h 4=0;s e l l i .d j=a t o i(c h);m e m c p y (c h,s t r+18,5);c h 5=0;s e l l

41、i .s l=a t o i(c h);s e l l f i .j e=(l o n g)s e l l i .d j*s e l l i .s i;f c l o s e(f p);)v o i d W r i t e D a t ()(F I L E *f p;i n t i;f p=f o p e n(，z0U T 9.D A T,w)；f o r(i=0;i 100;i+)p r i n t f(*%s%s%4d%5d%5d n，s e l l i .d m,s e l l i .m e,s e l l i .d j,s e l l i .s i,s e l l i .j e);f

42、p r i n t f(f p,*%s%s%4d%5d%5d n”,s e l l i .d m,s e l l i .m e,s e i 1 i .d j,s e l l i .s i,s e l l i .je);f c l o s e(f p);)题目14己知数据文件I N.D A T中存有2 0 0个四位数，并已调用读函数r e a d D a t O把这些数存入数组a中，请考生编制函数j s V a l(),其功能是：依次从数组a中取出个四位数，如果该四位数连续大于该四位数以后的五个数且该数是奇数(该四位数以后不满五个数，则不统计)，则统计出满足此条件的个数e n t并把这些四位数按

43、从小到大的顺序存入数组b中，最后调用写函数w r i t e D a t()把结果e n t以及数组b中符合条件的四位数输出到O U T.D A T文件中。注意：部分源程序存在文件p r o g l.c中。程序中已定义数组：a 200,b 2 0 0 ,已定义变量：e n t请勿改动数据文件I N.D A T中的任何数据、主函数m a i n。、读函数r e a d D a t ()和写函数w r i t e D a t ()的内容。U i n c l u d et t d e f i n e M A X 200i n t a M A X ,b M A X ,e n t =0;v o i d

44、j s V a l ()(i n t i,j,f l a g;f o r(i=0;i M A X-5;I+)f o r(j=i+l;j a j&a i%2)f l a g=l;e l s e f l a g=O;b r e a k;)i f (f l a g-1)b c n t+=a i ;)f o r(i=0;i C N T-l;I+)f o r(j=i+l;j b j )f l a g=b i ;b i =b j ;b j =f l a g;v o i d r e a d D a t ()(i n t i ;F I L E *f p ;f p =f o p e n(i n.d a t,r)

45、;f o r(i =0;i M A X ;i+)f s c a n f(f p,%d”,&a i );f c l o s e(f p);v o i d m a i n O(i n t i ;r e a d D a t ();j s V a l O ;p r i n t f (满足条件的数二%d n，e n t);f o r(i =0;i e n t ;i+)p r i n t f(z/%d ”,b i );p r i n t f (/z n，z);w r i t e D a t ();w r i t e D a t ()(F I L E *f p ;i n t i ;f p =f o p e

46、n(o u t.d a t，w );f p r i n t f(f p,%d n,e n t);f o r(i =0;i e n t ;i+)f p r i n t f(f p,%d n,b i );f c l o s e(f p);题目15己知数据文件I N.D A T 中存有200个四位数，并已调用读函数r e a d D a t O 把这些数存入数组a中，请考生编制一函数j s V a l(),其功能是：若一个四位数的千位数字上的值小于等于百位数字上的值，百位数字上的值小于等于十位数字上的值，以及十位数字上的值小于等于个位数字上的值，并且原四位数是偶数，则统计出满足此条件的个数e n t

47、 并把这些四位数按从小到大的顺序存入数组b中，最后调用写函数w r i t e Da t ()把结果e n t 以及数组b中符合条件的四位数输出到O U T.D A T 文件中。注意：部分源程序存在文件p r o g l.c 中。程序中已定义数组：a 200,b 200,已定义变量：e n t请勿改动数据文件I N.D A T 中的任何数据、主函数m a i n。、读函数r e a d D a l ()和写函数w r i t e D a l ()的内容。t t i n c l u d e d e f i n e M A X 200i n t a M A X ,b M A X ,c n t=0;

48、v o i d j s V a l ()(i n t i,j;i n t q w,b w,s w,g w;f o r (i=0;i M A X;I+)q w=a i /1000;b w=a i%l 000/100;s w=a i%100/10;g w=a i%10;i f (q w=b w)&(b w=s w)&(s w=g w)&(a i%2 0)b c n t+=a i ;)f o r(i=0;i c n t-l;I+)f o r(j=i+l;j b j )q w=b i ;b i =b j ；b j =q w;)v o i d r e a d D a t()(i n t i ;F I L

49、 E *f p ;f p =f o p e n(i n.d a t,r);f o r(i =0;i M A X ;i+)f s c a n f(f p,;f c l o s e(f p);)v o i d m a i n O(i n t i ;r e a d D a t ();j s V a l ();p r i n t f (满足条件的数二%d n ，e n t);f o r(i =0;i e n t ;i+)p r i n t f(z/%d ”,b i );p r i n t f(z，n，z);w r i t e D a t ();)w r i t e D a t ()(F I L E *

50、f p ;i n t i ;f p =f o p e n(o u t.d a t，w)；f p r i n t f(f p,%d n，e n t);f o r d =0;i 读数据函数Re ad Dat ()和输出数据函数w ri t e Dat ()的内容。#inc lu d e#inc lu d et t inc lu d ec har x x 50 8 0;int max i ine=0;/*文章的总行数*/i nt Re ad Dat (v o id);v o id Writ e Dat (v o id);v o id St rCharJ R()lint i,j;fo r(i=0;i