C語(yǔ)言上機(jī)南開100題

☆題目1請(qǐng)編寫ー個(gè)函數(shù)jsValue(intm,intk,intxxロ),該函數(shù)的功能是:將大于整數(shù)m且緊靠m的k個(gè)素?cái)?shù)存入數(shù)組xx傳回。最后調(diào)用函數(shù)writeDat()讀取10組數(shù)據(jù),分別得出結(jié)果且把結(jié)果輸出到文件。ut.dat中。部分源程序存在文件progl.c中。例如:若輸入175則應(yīng)輸出:19,23,29,31,37?請(qǐng)勿改動(dòng)主函數(shù)main。和寫函數(shù)writeDat。的內(nèi)容。#include<conio.h>#includc<stdio.h>voidreadwriteDat();intisP(intm)(inti;for(i=2;i<m;i++)if(m%i==0)return0;return1;)voidnum(intm,intk,intxx[]){ints=0;for(m=m+l;k>0;m++)if(isP(m)){xx[s++]=m;k--;})main(){intm,n,xx[1000];clrscr();printfif^XnPleaseentertwointegers:M);scanfi(,,%d%d,,,&m,&n);num(m,n,xx);fbr(m=0;m<n;m++)printf(M%dH,xx[m]);printff\n")；readwriteDat();)voidreadwriteDat(){intm,n,xx[IOOO],i;FILE*rf,*wf;rf=fbpen(nin.dat,,,,,rM);wf=fbpen(Mout.datM,MwH);fbr(i=0;i<10;i++){fscanfi(rf,M%d%dn,&m,&n);num(m,n,xx);for(m=O;m<n;m++)fprintf(wf,M%dH,xx[m]);fprintf(wf,H\nM);}fclose(rf);fclose(wf);☆題目2已知數(shù)據(jù)文件IN.DAT中存有200個(gè)四位數(shù),并已調(diào)用讀函數(shù)readDat。把這些數(shù)存入數(shù)組a中,請(qǐng)考生編制ー函數(shù)jsVal(),其功能是:如果四位數(shù)各位上的數(shù)字均是0或2或4或6或8,則統(tǒng)計(jì)出滿足此條件的個(gè)數(shù)ent,并把這些四位數(shù)按從大到小的順序存入數(shù)組b中。最后main()函數(shù)調(diào)用寫函數(shù)writeDat。把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸岀到OUT.DAT文件中。注意:部分源程序存在文件progl.c中。程序中已定義數(shù)組:a[200],b[200],已定義變量:ent請(qǐng)勿改動(dòng)數(shù)據(jù)文件IN.DAT中的任何數(shù)據(jù)、主函數(shù)main。、讀函數(shù)readDat()和寫函數(shù)writeDat()的內(nèi)容〇#include<stdio.h>#defineMAX200inta[MAX],b[MAX],ent=0;voidjsVal(){intij,qw,bw,sw,gw;for(i=0;i<MAX;i++){qw=a[i]/1000;bw=a[i]/100%10;sw=a[i]%100/10;gw=a[i]%10;if(qw&&qw%2==0&&bw%2==0&&sw%2==0&&gw%2==0)b[cnt++]=a[i];}for(i=0;i<cnt-l;i++)for(j=i+l;j<cnty++)if(b[i]<bU]){qw=b[i];b[i]=b[j];bU]=qw;}voidreadDat(){inti;FILE*fp;fp=fbpen(Min.datM,V);for(i=0;i<MAX;i++)fscanfi(fp,H%d",&a[i]);fclose(fp);}voidmain(){inti;readDat();jsVal();printfC滿足條件的數(shù)=%d\n”,ent);fbr(i=0;i<ent;i++)printグ％d",b[i]);printf("\n");writeDat();}writeDat()(FILE*fp;inti;fp=fdpen("out.dat","w");fprintflffp,"%d\n",ent);fbr(i=0;i<ent;i++)fprintf(ip,"%d\n",b[i]);fclose(fp);★題目3函數(shù)RcadDat()實(shí)現(xiàn)從文件IN.DAT中讀取ー篇英文文章存入到字符串?dāng)?shù)組xx中;請(qǐng)編制函數(shù)StrOR(),其函數(shù)的功能是:以行為單位依次把字符串中所有小寫字母。左邊的字符串內(nèi)容移到該串的右邊存放,然后把小寫字母。刪除,余ド的字符串內(nèi)容移到已處理字符串的左邊存放,之后把已處理的字符串仍按行重新存入字符串?dāng)?shù)組xx中。最后main。函數(shù)調(diào)用函數(shù)WriteDat()把結(jié)果xx輸出到文件OUT5.DAT中。原始數(shù)據(jù)文件存放的格式是:每行的寬度均小于80個(gè)字符,含標(biāo)點(diǎn)符號(hào)和空格。注意：部分源程序存放在文件progl.c中。請(qǐng)勿改動(dòng)キ:函數(shù)main()、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)函數(shù)WritcDat()的內(nèi)容。#include<stdio.h>#include<string.h>#include<conio.h>charxx[50][80];intmaxline=0;/*文章的總行數(shù)?/intRcadDat(void);voidWriteDat(void);voidStrOR(void){inti,rightoj,s,k;chartem[80];for(i=0;i<maxline;i++)for(j=strlen(xx[i])-l;j>=0;j-){k=0;memset(tem,〇,80);if(xx[i][j]==to,){righto=j;for(s=righto+l;s<strlen(xx[i]);s++)tem[k++]=xx[i][s];for(s=0;s<righto;s++)if(xx[i][s]!='o')tem[k++]=xx[i][s];strcpy(xx[i],tem);}elsecontinue;)}voidmain(){clrscr();ifi(ReadDat()){printff數(shù)據(jù)文件IN.DAT不能打開!\n\007");return;)StrOR();WriteDat();intReadDat(void){FILE?巾;inti=0;char*p;if((fp=fbpen(HIN.DATH,V))=NULL)return1;while(fgets(xx[i],80,fp)!=NULL){p=strchr(xx[i],'\n*);\f(p)*p=0;i-H-;}maxline=i;fclose(fp);return0;)voidWriteDat(void)]FILE*fp;inti;clrscr();fp=fopen(MOUT5.DATH,nw");fbr(i=0;i<maxline;i++){printff%s\n”,xx[i]);fprintflffp,n%s\nM,xx[i]);}fclose(fp);}★題目4函數(shù)ReadDat()實(shí)現(xiàn)從文件IN.DAT中讀取一篇英文文章存入到字符串?dāng)?shù)組xx中,請(qǐng)編制函數(shù)StrOLO,其函數(shù)的功能是:以行為單位對(duì)行中以空格或標(biāo)點(diǎn)符號(hào)為分隔的所有單詞進(jìn)行倒排。最后把己處理的字符串(應(yīng)不含標(biāo)點(diǎn)符號(hào))仍按行重新存入字符串?dāng)?shù)組xx中,最后調(diào)用函數(shù)writeDat()把結(jié)果xx輸出到文件OUT6.DAT中。例如:原文:YouHeMeIamastudent.結(jié)果：MeHeYoustudentaamI原始數(shù)據(jù)文件存放的格式是:每行的寬度均小于80個(gè)字符,含標(biāo)點(diǎn)符號(hào)和空格。部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)ReadDat。和輸出數(shù)據(jù)函數(shù)writeDat。的內(nèi)容。#include<stdio.h>#include<string.h>#include<conio.h>#include<ctype.h>charxx[50][80];intmaxline=0;/?文章的總行數(shù)?/intReadDat(void);voidWriteDat(void);voidStrOL(void){intij,k9s,m,strl;charstr[80];for(i=0;i<maxline;i++){strl=strlen(xx[i]);memset(str,0,80);s=k=O;forG=strl-l;j>=0;j?){if(isalpha(xx[i][j]))k++;else{for(m=l;m<=k;m++)str[s++]=xx[i][j+m];k=0;}if(!isalpha(xx[i][j]))str[s++]=')for(m=l;m<=k;m++)str[s++]=xx[ij[j+mj;str[s]=*\O*;strcpy(xx[i],str);}}voidmain()(clrscr();ifi(ReadDat()){printff數(shù)據(jù)文件IN.DAT不能打開!\n\007");return;}StrOL();WriteDat();intRcadDat(void)(FILE*fp;inti=0;char*p;ifi[(fp=fbpcn(nIN.DAT,,,Hr"))==NULL)retum1;while(fgets(xx[i],80,fp)!=NULL){p=strchr(xx[i]/\n*);if(p)*p=O;}maxline=i;fclose(fp);return0;FILE*fp;inti;clrscr();fp=fbpen(nOUT6.DAT,,,,,wH);fbr(i=O;i<maxline;i-H-){printf(M%s\nM,xx[i]);fprintf(fp,n%s\nH,xx[i]);}fclose(fp);☆題目5(整數(shù)排序題)在文件in.dat中有200個(gè)正整數(shù),且每個(gè)數(shù)均在!000至9999之間。函數(shù)ReadDat。讀取這200個(gè)數(shù)存放到數(shù)組aa中。請(qǐng)編制函數(shù)jsSort。,其函數(shù)的功能是:要求按每個(gè)數(shù)的后三位的大小進(jìn)行升序排列,然后取出滿足此條件的前10個(gè)數(shù)依次存入數(shù)組bb中,如果后三位的數(shù)值相等,則按原先的數(shù)值進(jìn)行降序排列。最后調(diào)用函數(shù)WriteDat。把結(jié)果bb輸出到文件out.dat中。例:處理前60125099901270258088處理后90126012702580885099部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)ReadDat。和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。#include<stdio.h>#include<string.h>#include<conio.h>intaa[200],bb[10];voidjsSort()(intij,data;for(i=0;i<199;i++)for(j=i+l;j<200;j++)if(aa[i]%1000>aa[j]%1000llaa[i]%1000==aa[j]%1000&&aa[i]<aa[j]){data=aa[i];aa[ij=aa[j];aa[j]=data;}for(i=0;i<10;i++)bb[i]=aa[i];}voidmain()readDat();jsSort();writeDat();rcadDat(){FILE*in;inti;in=fbpen(,,in.dat,,；,rM);fbr(i=O;i<200;i++)fscanfi[inj%d,”,&aa[i]);fclose(in);}writcDat(){FILE*out;inti;clrscr();out=fbpcn(,,out.dat,,,,,wH);fbr(i=O;i<10;i++){printf(M%dn,bb[i]);mrintfifout/％d\n”,bb[i]);fclose(out);}☆題目6正整數(shù)排序在文件in.dat中有200個(gè)正整數(shù),且每個(gè)數(shù)均在!000至9999之間。函數(shù)ReadDat。讀取這200個(gè)數(shù)存放到數(shù)組aa中。請(qǐng)編制函數(shù)jsSort(),其函數(shù)的功能是:要求按每個(gè)數(shù)的后三位的大小進(jìn)行降序排列,然后取出滿足此條件的前10個(gè)數(shù)依次存入數(shù)組b中,如果后三位的數(shù)值相等,則按原先的數(shù)值進(jìn)行升序排列。最后調(diào)用函數(shù)WriteDat()把結(jié)果bb輸出到文件out.dat中。例:處理前90125099601270258088處理后50998088702560129012注意：部分源程序已給出。請(qǐng)勿改動(dòng)キ函數(shù)main()、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。#include<stdio.h>#include<string.h>#include<conio.h>intaa[200],bb[10];voidjsSortO(intij,data;for(i=0;i<199;i++)forG=i+l;j<200;j++)if(aa[i]%1000<aa[j]%1000llaa[iJ%1000==aalj]%1000&&aa[i]>aa[j]){data=aa[i];aa[i]=aa[j];aa[j]=data;}for(i=0;i<10;i++)bb[i]=aa[i];}voidmain(){rcadDat();jsSort();writeDat();system("pause**);}rcadDat(){FILE*in;inti;in=fbpen(,,in.dat,7,r");fbr(i=O;i<200;i++)fscanf(inj%dj,&aa[i]);fclose(in);}writeDat(){FILE*out;inti;clrscr();out=fbpen("out.dat",“w")；fbr(i=O;i<10;i++){printf(Mi=%d,%d\nM,i+l,bb[i]);fi)rintfi(outj%d\n”,bb[i]);fclose(out);☆題目7(結(jié)構(gòu)體操作題)已知在文件IN.DAT中存有!00個(gè)產(chǎn)品銷售記錄,每個(gè)產(chǎn)品銷售記錄由產(chǎn)品代碼dm(字符型4位),產(chǎn)品名稱me(字符型10位),単價(jià)dj(整型)，數(shù)量si(整型)，金額je(長(zhǎng)整型)五部分組成。其中:金額=單價(jià)?數(shù)量計(jì)算得出。函數(shù)ReadDat。是讀取這100個(gè)銷售記錄并存入結(jié)構(gòu)數(shù)組sell中。請(qǐng)編制函數(shù)SortDat(),其功能要求:按產(chǎn)品代碼從大到小進(jìn)行排列，若產(chǎn)品代碼相同,則按金額從大到小進(jìn)行排列，最終排列結(jié)果仍存入結(jié)構(gòu)數(shù)組sell中,最后調(diào)用函數(shù)WriteDat。把結(jié)果輸出到文件OUT6.DATヰし部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)函數(shù)WriteDat。的內(nèi)容。#includc<stdio.h>#include<mem.h>#includc<string.h>#include<conio.h>#includc<stdlib.h>#defineMAX100typedefstruct{chardm[5];/?產(chǎn)品代碼ッcharmc[ll];/?產(chǎn)品名稱?/intdj; /*單價(jià)?/intsi;/*數(shù)量*/longje; /?金額?/}PRO;PROsell[MAX];voidReadDat();voidWriteDat();voidSortDat(){intij;PROxy;for(i=0;i<99;i++)for(j=i+l;j<100;j++)if(strcmp(sell[i].dm9sell[j].dm)<0llstrcmp(sell[i].dm9sell|j].din)-0&&sell[i].je<sell[j].je){xy=sell[ij;sell[i]=sell[j];sell[j]=xy;}}voidmain()(memset(sell,0,sizeof(sell));ReadDat();SortDat();WriteDat();voidReadDat(){FILE*fp;charstr[8O],ch[ll];inti;用=fbpen("IN.DAT”,ザ;fbr(i=0;i<100;i++){fgets(str,8O,fp);mcmcpy(scll[i].dm,str,4);memcpy(sell[i].mc,str+4,10);mcmcpy(ch,str+14,4);ch[4]=0;sell[i].dj=atoi(ch);memcpy(ch,str+18,5);ch[5]=0;sell[i].sl=atoi(ch);scll[i].je=(long)sell[i].dj*sell[i].sl;}fclose(fp);voidWriteDat(void){FILE*fp;inti;fp=fopen(MOUT6.DATH,,,wn);fbr(i=O;i<100;i-H-){printf(M%s%s%4d%5d%5d\nM,sell[i].dm,sell[i].mc,sell[i].dj,sell[i].sl,sell[i].je);fprintf(fp,H%s%s%4d%5d%5d\nM,sell[i].dm,sell[i].mc,sell[i].dj,sell[i].sl,sell[i].je);fclose(fp);★題目8(字符替換題)函數(shù)ReadDat()實(shí)現(xiàn)從文件ENGIN中讀取一篇英文文章,存入到字符串?dāng)?shù)組xx中;請(qǐng)編制函數(shù)encryptChar()?按給定的替代關(guān)系對(duì)數(shù)組xx中的所有字符進(jìn)行替代,仍存入數(shù)組xx的對(duì)應(yīng)的位置上，最后調(diào)用函數(shù)WriteDat。把結(jié)果xx輸出到文件PS1.DAT中。替代關(guān)系:f(p)=p*llmod256(p是數(shù)組中某ー個(gè)字符的ASCII值，f(p)是計(jì)算后新字符的ASCH值),如果計(jì)算后f(p)值小于等于32或大于130,則該字符不變,否則將f(p)所對(duì)應(yīng)的字符進(jìn)行替代。(注意中間變量用無(wú)符號(hào)整型)，部分源程序存在文件progl.c中。原始數(shù)據(jù)文件存放的格式是:每行的寬度均小于80個(gè)字符。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。#include<stdio.h>#includc<string.h>#include<conio.h>#includc<ctype.h>unsignedcharxx[50][80];intmaxline=0;/*文章的總行數(shù)?/intReadDat(void);voidWritcDat(void);voidencryptChar(){intij;for(i=0;i<maxline;i++)for(j=0;j<str!en(xx[i]);j++)if(xx[i][j]*ll%256<=32llxx[i][j]*ll%256>130)continue;elsexx[i]Lj]=xx[i][j]*ll%256;}voidmain()(clrscr();if(ReadDat()){printf("數(shù)據(jù)文件ENGIN不能打開!\n\007H);return;}encryptChar();WriteDat();intReadDat(void){FILE*fp;inti=0;unsignedchar*p;if((fp=fdpen(neng.in,,,,,r"))==NULL)return1;while(fgets(xx[i],80,fp)!=NULL){p=strchr(xx[i]/\n*);if(p)*p=O;i++；maxline=i;fclose(fp);return0;)voidWritcDat(void)(FILE*fp;inti;fp=fopen(Mpsl.dat",,,w,');fbr(i=O;i<maxline;i-n-){printf(M%s\nn,xx[i]);fprintfi(fp,M%s\nn,xx[i]);}fclose(fp);★☆題目9(字符串排序題)函數(shù)ReadDat()實(shí)現(xiàn)從文件IN.DAT中讀取一篇英文文章存入到字符串?dāng)?shù)組xx中,請(qǐng)編制函數(shù)SortCharDO,其函數(shù)的功能是:以行為單位對(duì)字符按從大到小的順序進(jìn)行排序,排序后的結(jié)果仍按行重新存入字符串?dāng)?shù)組xx中,最后調(diào)用函數(shù)writeDat。把結(jié)果xx輸出到文件OUT2.DAT中。例:原文:dAe,BfC.CCbbAA結(jié)果:fedCBA.bbCCAA原始數(shù)據(jù)文件存放的格式是:每行的寬度均小于80個(gè)字符,含標(biāo)點(diǎn)符號(hào)和空格。部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)ReadDat。和輸出數(shù)據(jù)函數(shù)writeDat。的內(nèi)容。#include<stdio.h>#include<string.h>#include<conio.h>charxx[50][80];intmaxline=0;/?文章的總行數(shù)?/intReadDat(void);voidWriteDat(void);voidSortCharD(void){intij,k,strl;charch;for(i=0;i<maxline;i++){strl=strlen(xx[i]);for(j=0;j<strl-l;j++)for(k=j+l;k<strl;k++)if(xx[i][j]<xx[i][k])(ch=xx[i][j];xx[i][j]=xx[l][k];xx[i][k]=ch;})}voidmain()(clrscr();if(ReadDatO){printff數(shù)據(jù)文件IN.DAT不能打開!\n\007M);return;}SortCharD();WriteDat();}intRcadDat(void)(FILE*fp;inti=0;char*p;if((fp=fopen(MIN.DAT,\V))==NULL)return1;while(fgets(xx[i],80,fp)!=NULL){p=strchr(xx[i]/\n,);if(p)*p=O;i+4-*)maxline=i;fclose(fp);return0;}voidWriteDat(void){FILE*fp;inti;fp=fbpen(MOUT2.DATM,,,wn);fbr(i=O;i<maxline;i-H-){printf(n%s\nH,xx[i]);fprintf(fp,M%s\nw,xx[i]);}fclose(fp);★☆題目10(替換字符題)函數(shù)ReadDat()實(shí)現(xiàn)從文件IN.DAT中讀取一一篇英文文章存入到字符串?dāng)?shù)組xx中,請(qǐng)編制函數(shù)ConvertCharAO,其函數(shù)的功能是:以行為單位把字符串中的所有小寫字母改寫成該字母的下ー個(gè)字母,如果是字母z,則改寫成字母a。大寫字母仍為大寫字母,小寫字母仍為小寫字母,其他字符不變。把已處理的字符串仍按行重新存入字符串?dāng)?shù)組xx中,最后調(diào)用函數(shù)writeDat()把結(jié)果xx輸出到文件OUT1.DAT中。例:原文:Adb.Bcdzaabck.LLhj結(jié)果:Aec.Bdeabbcdl.LLik原始數(shù)據(jù)文件存放的格式是:每行的寬度均小于80個(gè)字符,含標(biāo)點(diǎn)符號(hào)和空格。部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)函數(shù)writeDat。的內(nèi)容。#include<stdio.h>#include<string.h>#include<conio.h>charxx[50][80];intmaxline=0;/?文章的總行數(shù)?/intReadDat(void);voidWriteDat(void);voidConvertCharA(void){intij;for(i=0;i<maxline;i++){for(j=0;j<strlen(xx[i]);j++)if(xx[iJUJ==?z*)xx[i]U]=*aJ;elseif(xx[i][j]>=,a,&&xx[i][j]<=,y,)xx[i][j]+=l;)}voidmain(){clrscr();if(ReadDatO){printff數(shù)據(jù)文件IN.DAT不能打開!\n\007");return;)ConvertCharA();WriteDat();}intReadDat(void){FILE*fp;inti=0;char*p;if{(fp=fbpen(nIN.DATM,MrH))==NULL)return1;while(fgets(xx[i],80,fp)!=NULL){p=strchr(xx[i]/\n,);if(p)*p=O;i++;)maxline=i;fclose(fp);return0;}voidWriteDat(void){FILE*fp;inti;clrscrO;fp=fbpen(HOUTl.DAT,,,,,wM);fbr(i=O;i<maxline;i-F+){printf(M%s\nM,xx[i]);fprintf(fp,M%s\nM,xx[i]);}fclose(fp);}☆題目11(字符串字母移位題)程序progl.c的功能是:把s字符串中的所有字母改寫成該字母的下ー個(gè)字母,字母z改寫成字母a。要求大寫字母仍為大寫字母,小寫字母仍為小寫字母,其它字符不做改變。請(qǐng)考生編寫函數(shù)chg(char*s)實(shí)現(xiàn)程序要求，最后調(diào)用函數(shù)readwriteDAT()把結(jié)果輸出到文件beLout中。例如:s字符串中原有的內(nèi)容為:Mn.l23Zxy,則調(diào)用該函數(shù)后,結(jié)果為:No.l23Ayzo注意:部分源程序存在文件progl.c文件中。請(qǐng)勿改動(dòng)主函數(shù)main()和輸出數(shù)據(jù)函數(shù)readwriteDAT。的內(nèi)容。#include<conio.h>#include<string.h>#include<stdio.h>#include<ctype.h>#defineN81voidreadwriteDAT();voidchg(char*s){intI;for(I=0;I<str!en(s);I++)if(s[i]==,z,lls[i]==,Z,)s[i]-=25;elseif(s[i]>=,a,&&s[i]<=,y,lls[i]>=,A,&&s[i]<=,Y,)s[i]+=l;}main()(chara[N];clrscr();printf(nEnterastring:M);gcts(a);printff'Theoriginalstringisゴ);puts(a);chg(a);printff'Thestringaftermodified:");puts(a);readwriteDAT();}voidreadwriteDATQ(inti;chara[N];FILE*r「*wf;rf=fbpen("bcl.in",V);wf=fopenCbcl.our,nwM);fbr(i=0;i<50;i++){fscanf(rf,H%sn,a);chg(a);fprintf(wf,"%s\nM,a);Ifclose(rf);fclose(wf);★☆題冃12(結(jié)構(gòu)體運(yùn)算題題)已知在文件IN.DAT中存有100個(gè)產(chǎn)品銷售記錄,每個(gè)產(chǎn)品銷售記錄由產(chǎn)品代碼dm(字符型4位),產(chǎn)品名稱me(字符型10位),單價(jià)dj(整型),數(shù)量si(整型)，金額je(長(zhǎng)整型)五部分組成。其中:金額=單價(jià)?數(shù)量計(jì)算得出。函數(shù)ReadDatO是讀取這100個(gè)銷售記錄并存入結(jié)構(gòu)數(shù)組sell中。請(qǐng)編制函數(shù)SortDat。,其功能要求:按產(chǎn)品名稱從小到大進(jìn)行排列,若產(chǎn)品名稱相等，則按金額從小到大進(jìn)行排列,最終排列結(jié)果仍存入結(jié)構(gòu)數(shù)組sell中，最后調(diào)用函數(shù)WriteDat()把結(jié)果輸出到文件OUT5.DAT中。部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。#include<stdio.h>#includc<mem.h>#include<string.h>#includc<conio.h>#include<stdlib.h>#defineMAX100typedefstruct{chardm[5];/?產(chǎn)品代碼?/charmc[U];/?產(chǎn)品名稱?/intdj; /?單價(jià)*/intsi; /?數(shù)量?/longje; /*金額*/}PRO;PROsell[MAX];voidReadDat();voidWriteDat();voidSortDat(){intij；PROxy;for(i=0;i<99;i++)for(j=i+l;j<100;j++)if(strcmp(sellli].mc,sell[j].mc)>Ollstrcmp(sell[i].mc,sell|jJ.mc)==O&&seH[i].je>sell[jJ.je){xy=sell[i];sell[i]=sell[j];sell[j]=xy;})voidmain(){memset(sell,0,sizeof(sell));ReadDat();SortDat();WriteDat();voidRcadDat()(FILE*fp;charstr[80],ch[l1];inti;m=fbpcn("IN.DAT”,ケ")；fbr(i=O;i<l00;i-H-){fgets(str,8O,fp);memcpy(sell[i].dm,str,4);mcmcpy(sell[i].mc,str+4,10);memcpy(ch,str+14,4);ch[4]=0;sell[i].dj=atoi(ch);memcpy(ch,str+l8,5);ch[5]=O;sell[i].sl=atoi(ch);sell[i].je=(long)sell[i].dj*sell[i].sl;fclose(fp);voidWriteDat(){FILE*fp;inti;用=fbpen(”〇UT5.DAT",”w“)；fbr(i=0;i<100;i++){printf(H%s%s%4d%5d%5d\n,,,sell[i].dm,sell[i].mc,sell[i].dj,sell[i].sl,sell[i].je);fprintf(fp,M%s%s%4d%5d%5d\nM,sell[i].dm,sell[i].mc,sell[i].dj,sell[i].sl,sell[i].je);}fclose(fp);題目13（結(jié)構(gòu)體運(yùn)算題）已知在文件IN.DAT中存有100個(gè)產(chǎn)品銷售記錄,每個(gè)產(chǎn)品銷售記錄山產(chǎn)品代碼dm（字符型4位）,產(chǎn)品名稱me（字符型10位）,單價(jià)dj（整型），數(shù)量si（整型）,金額je（長(zhǎng)整型）五部分組成。其中:金額=單價(jià)?數(shù)量計(jì)算得出。函數(shù)ReadDat。是讀取這100個(gè)銷售記錄并存入結(jié)構(gòu)數(shù)組sell中。請(qǐng)編制函數(shù)SortDatO,其功能要求:按產(chǎn)品代碼從小到大進(jìn)行排列,若產(chǎn)品代碼相等,則按金額從大到小進(jìn)行排列,最終排列結(jié)果仍存入結(jié)構(gòu)數(shù)組sell中,最后調(diào)用函數(shù)WriteDat。把結(jié)果輸出到文件OUT9.DAT中。部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。#include<stdio.h>#includc<mem.h>//include<string.h>#includc<conio.h>#include<stdlib.h>#defineMAX100typedcfstruct{chardm[5];/?產(chǎn)品代碼ッcharmc[ll];/?產(chǎn)品名稱?/intdj; /*單價(jià)?/intsi; /?數(shù)量?/longje; /?金額?/}PRO;PROsell[MAX];voidRcadDat();voidWriteDat();voidSortDat(){intij;PROxy;for(i=0;i<99;i++)for(j=i+l;j<100;j++)if(strcmp(sell[i].dm,sell[j].dni)>0llstrcmp(sell[i].dm9sell[j].dm)==0&&sell[i].je<sell[j].je){xy=sell[i];sell[il=sell[j];sell[j]=xy;}}voidmain(){memset(sell,〇,sizeofifsell));ReadDat();SortDat();WriteDat();}voidReadDat()(FILE*fp;charstr[80],ch[ll];inti;fp=fbpen(MIN.DATH,V);fbr(i=O;i<100;i++){fgets(str,80,fp);memcpy(sell[i].dm,str,4);memcpy(sell[i].mc,str+4,10);memcpy(ch,str+14,4);ch[4]=0;sell[i].dj=atoi(ch);memcpy(ch,str+18,5);ch[5]=0;sell[i].sl=atoi(ch);sell[i].je=(long)sell[i].dj*sell[i].sl;fclose(fp);)voidWritcDatO{FILE*fp;inti;fp=fopen(MOUT9.DAT,,,,,wn);fbr(i=0;i<100;i++){printf(n%s%s%4d%5d%5d\nH,sell[i].dm9sell[i].mc,sell[i].dj,sell[i].sl,sell[i]Je);fprintf(fp,M%s%s%4d%5d%5d\nH,sell[i].dm,sell[i].mc,sell[i].dj,sell[i].sl,sell[i].je);}fclose(fp);}★☆題冃!4(整數(shù)統(tǒng)計(jì)排序題)已知數(shù)據(jù)文件IN.DAT中存有200個(gè)四位數(shù),并已調(diào)用讀函數(shù)readDat。把這些數(shù)存入數(shù)組a中,請(qǐng)考生編制ー函數(shù)jsVal。,其功能是:依次從數(shù)組a中取出ー個(gè)四位數(shù),如果該四位數(shù)連續(xù)大于該四位數(shù)以后的五個(gè)數(shù)且該數(shù)是奇數(shù)(該四位數(shù)以后不滿五個(gè)數(shù),則不統(tǒng)計(jì)),則統(tǒng)計(jì)出滿足此條件的個(gè)數(shù)ent并把這些四位數(shù)按從小到大的順序存入數(shù)組b中,最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。注意:部分源程序存在文件progl.e中。程序中已定義數(shù)組:a[200],b[200],已定義變量：ent請(qǐng)勿改動(dòng)數(shù)據(jù)文件IN.DAT中的任何數(shù)據(jù)、主函數(shù)main。、讀函數(shù)readDat()和寫函數(shù)writeDat()的內(nèi)容。//include<stdio.h>#defineMAX200inta[MAX],b[MAX],ent=0;voidjsVal(){intfor(i=0;i<MAX-5;i++){for(j=i+l;j<=i+5;j++)if(a[i]>a[j]&&a[l]%2)flag=l;else{flag=O;break;}if(flag==l)b[cnt++]=a[i];}for(i=0;i<cnt-l;i++)for(j=i+l;j<cnt;j++)if(b[i]>b[j]){nag=b[i];b[i]=bU];bU]=nag;}}voidreadDat(){inti;FILE*fp;fjp=fbpen("in.daロザ;fbr(i=0;i<MAX;i++)fccanf(fp,M%d",&a[i]);fclose(fp);}voidmain()(inti;readDat();jsVal();printfT滿足條件的數(shù)=%d\n”,ent);fbr(i=0;i<ent;i++)printff%d",b[i]);printfi("\n");writeDat();}writeDat(){FILE*fp;inti;fp=fbpen("out.dat","w");fprintf(fp,"%d\n",ent);fbr(i=0;i<ent;i-H-)fprintf(fp,"%d\n",b[i]);fclose(fp);★題目15（整數(shù)各位數(shù)字運(yùn)算排序題）L:知數(shù)據(jù)文件IN.DAT中存有200個(gè)四位數(shù),并己調(diào)用讀函數(shù)readDat。把這些數(shù)存入數(shù)組a中,請(qǐng)考生編制ー函數(shù)jsVal(),其功能是:若一個(gè)四位數(shù)的千位數(shù)字上的值小于等于百位數(shù)字上的值,百位數(shù)字上的值小于等于十位數(shù)字上的值，以及十位數(shù)字上的值小于等于個(gè)位數(shù)字上的值,并且原四位數(shù)是偶數(shù),則統(tǒng)計(jì)出滿足此條件的個(gè)數(shù)ent并把這些四位數(shù)按從小到大的順序存入數(shù)組b中,最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。注意:部分源程序存在文件prog"中。程序中已定義數(shù)組：a[200],b[200],已定義變量:ent請(qǐng)勿改動(dòng)數(shù)據(jù)文件IN.DAT中的任何數(shù)據(jù)、主函數(shù)main。、讀函數(shù)readDat。和寫函數(shù)writeDat()的內(nèi)容。#include<stdio.h>//defineMAX200inta[MAX],b[MAX],cnt=0;voidjsVal(){intij;intqw,bw,sw,gw;for(i=0;i<MAX;i++){qw=a[i]/1000; bw=a[i]%1000/100;sw=a[i]%100/10;gw=a[i]%10;if((qw<=bw)&&(bw<=sw)&&(sw<=gw)&&(a[i]%2==0))b[cnt++]=a[i];}for(i=0;i<cnt-l;i++)for(j=i+l;j<cnt;j++)if(b[i]>b[j]){qw=b[i];b[i]=b[j];b(j]=qw;}}voidreadDat()(inti;FILE*fp;fp=fdpenC'in.daロT);for(i=0;i<MAX;i++)fscanf(用,“％d”,&a[i]);fclose(fp);voidmain()(inti;readDat();jsVal();printf("滿足條件的數(shù)=%d\n”,ent);fbr(i=0;i<cnt;i++)printf(M%d",b[i]);printf(H\n");writeDat();writcDat(){FILE*fp;inti;fp=fbpen(”〇ut.da口"w”);fprintfiffp,H%d\nH,ent);fbr(i=0;i<ent;i-H-)fprintfiffp,M%d\nn,b[i]);fclose(fp);)★☆題目16(字符替換題)函數(shù)ReadDat。實(shí)現(xiàn)從文件IN.DAT中讀取?篇英文文章存入到字符串?dāng)?shù)組xx中,請(qǐng)編制函數(shù)StrCharJRO,其函數(shù)的功能是:以行為單位把字符串中所有字符的ASCII值右移4位,然后把右移后的字符ASCII值再加上原字符的ASCI!值,得到新的字符仍存入原字符串對(duì)應(yīng)的位置上。最后把己處理的字符串仍按行市新存入字符串?dāng)?shù)組xx中,最后調(diào)用函數(shù)writeDat()把結(jié)果xx輸出到文件OUT8.DAT中。原始數(shù)據(jù)文件存放的格式是:每行的寬度均小于80個(gè)字符，含標(biāo)點(diǎn)符號(hào)和空格。部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main()、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)函數(shù)writeDat()的內(nèi)容。#include<stdio.h>#include<string.h>#include<conio.h>charxx[50][80];intmaxline=0;/?文章的總行數(shù)?/intReadDat(void);voidWriteDat(void);voidStrCharJRO{intij;for(i=0;i<maxline;i++)for(j=0;j<strlen(xx[i]);j++)xx[i][jj+=(xx[i][jj?4);}voidmain(){clrscrO;if(ReadDatO){printff數(shù)據(jù)文件IN.DAT不能打開!\n\007");return;)StrCharJR();WriteDat();}intReadDat(void){FILE*fp;inti=0;char*p;if{(fp=fbpen(MIN.DATM,MrH))==NULL)return1;while(fgets(xx[i],80,fp)!=NULL){p=strchr(xx[i]/\n,);if(p)*p=O;i++;}maxline=i;fclose(fp);return0;}voidWriteDat(void){FILE*fp;inti;clrscr();fp=fopen(HOUT8.DAT,,,,,wH);fbr(i=O;i<maxline;i-lH-){printf(M%s\nM,xx[i]);fprintf(fp,M%s\nn,xx[i]);jfclose(fp);}☆題目17(親朋字符替換題)函數(shù)READDAT〇實(shí)現(xiàn)從文件IN.DAT中讀取ー篇英文文章存入到字符串?dāng)?shù)組XX中;請(qǐng)編制函數(shù)CHA(),其函數(shù)功能是:以行為單位把字符串中的第一個(gè)字符的ASCH值加第二個(gè)字符的ASCH值,得到第一個(gè)親朋字符,第二個(gè)字符的ASCH值加第三個(gè)字符的ASCII值,得到第二個(gè)新字符，依此類推一直處理到最后第二個(gè)字符,最后一個(gè)字符的ASCI!值加原第ー個(gè)字符的ASCII值，得到最后ー個(gè)新的字符,得到的新字符分別存放在原字符串對(duì)應(yīng)的位置上。最后把已處理的字符串逆轉(zhuǎn)后按行重新存入字符串?dāng)?shù)組XX中,最后調(diào)用函數(shù)WRITEDATO把結(jié)果XX輸出到文件OUT9.DAT中.原始數(shù)據(jù)文件存放的格式是:每行的寬度均小于80個(gè)字符,含標(biāo)點(diǎn)符號(hào)和空格.注意:部分源程序已給出。請(qǐng)匆改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)ReadDat。和輸出數(shù)據(jù)函數(shù)writeDat。的內(nèi)容。#include<stdio.h>#includc<string.h>#include<conio.h>charxx[50][80];intmaxline=0;/*文章的總行數(shù)?/intReadDat(void);voidWriteDat(void);voidChA(void){intij;charch;for(i=0;i<maxline;i++){ch=xx[i][0];for(j=0;j<strlen(xx[i])-l;j++)xx[i][j]+=xx[i][j+l];xx[i][strlen(xx[i])-l]+=ch;strrev(xx[i]);})voidmain()(clrscr();if(ReadDat()){printff數(shù)據(jù)文件IN.DAT不能打開!\n\007”);return;)ChA();WriteDat();}intReadDat(void)(FILE*fp;inti=0;char*p;ifi[(fp=fbpen(”IN.DAT;ド))=NULL)return1;while(fgets(xx[i],80,fp)!=NULL){p=strchr(xx[i],'\n*);if(p)*p=0;i++；maxline=i;fclose(fp);return0;voidWriteDat(void)(FILE*fp;inti;clrscr();fp=fbpen("〇UT9.DAT”,“w“);fbr(i=0;i<maxline;i-H-){printff'%s\n”,xx[i]);fprintf(fp,H%s\nM,xx[i]);}fclose(fp);☆題目18函數(shù)ReadDat()實(shí)現(xiàn)從文件ENGIN中讀取ー?篇英文文章,存入到字符串?dāng)?shù)組xx中;請(qǐng)編制函數(shù)encryptChar。,按給定的替代關(guān)系對(duì)數(shù)組xx中的所有字符進(jìn)行替代,仍存入數(shù)組xx的對(duì)應(yīng)的位置上,最后調(diào)用函數(shù)WriteDat()把結(jié)果xx輸出到文件PS10.DAT中。替代關(guān)系:f(p)=p*Hmod256(p是數(shù)組中某ー個(gè)字符的ASCII值,f(p)是計(jì)算后新字符的ASCI!值),如果原字符的ASCII值是偶數(shù)或計(jì)算后f(p)值小于等于32,則該字符不變,否則將f(p)所對(duì)應(yīng)的字符進(jìn)行替代。部分源程序存在文件progl.c中。原始數(shù)據(jù)文件存放的格式是:每行的寬度均小于80個(gè)字符。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)RcadDat()和輸出數(shù)據(jù)函數(shù)WritcDat()的內(nèi)容。#include<stdio.h>#include<string.h>#include<conio.h>#include<ctype.h>unsignedcharxx[50][80];intmaxline=0;/?文章的總行數(shù)?/intReadDat(void);voidWritcDat(void);voidencryptChar()(intij;for(i=0;i<maxline;i++)for(j=0;j<strlen(xx[i]);j++)if(xx[ij[j]*ll%256<=32llxx[iJ[j]%2==0)continue;elsexx[i][j]=xx[i][j]*ll%256;)voidmain()(clrscr();ifi(ReadDat()){printff數(shù)據(jù)文件ENGIN不能打開!\n\007H);return;)encryptChar();WriteDat();intReadDat(void){FILE*fp;inti=0;unsignedchar*p;i^(fp=fbpen(Meng.inM,,'r"))=NULL)return1;while(fgets(xx[i],80,fp)!=NULL){p=strchr(xx[i]/\n,);if(p)*p=O;i++；}maxline=i;fclose(fp);return0;}voidWriteDat(void)(FILE*fp;inti;fp=fbpen(MpslO.dat"；,wM);fbr(i=O;i<maxline;i-H-){printf(,,%s\n,,,xx[i]);mrintRa，"％s\iT,xx[i]);}fclose(fp);}☆題目19(單詞個(gè)數(shù)統(tǒng)計(jì)題)編寫ー個(gè)函數(shù)findStr(char*str,char*substr)?該函數(shù)統(tǒng)Hー個(gè)長(zhǎng)度為2的子字符串在另ー個(gè)字符串中出現(xiàn)的次數(shù)。例如,假定輸入的字符串為”asdasasdfgasdaszx67asdmkk>”,子字符串為“as”,函數(shù)返回值是6。函數(shù)ReadWrite()實(shí)現(xiàn)從文件in.dat中讀取兩個(gè)字符串,并調(diào)用函數(shù)findStr。,最后把結(jié)果輸出到文件out.dat中。注意:部分源程序存在文件progLc中。請(qǐng)勿改動(dòng)主函數(shù)main()和其它函數(shù)中的任何內(nèi)容,僅在函數(shù)findStr。的花括號(hào)中填入你編寫的若干語(yǔ)句。#includc<stdio.h>#include<string.h>#includc<conio.h>intfindStr(char*str,char*substr){intiJ,lenl,len2,cnt=0,flag;lenl=strlen(str);len2=strlen(substr);for(i=0;i<lenl;i++){for(j=0;j<len2;j++)if(str[i+j]==substr[j])flag=l;else{flag=O;break;}if(flag==l)cnt++;)returnent;)main(){charstr[81],substr[3];intn;clrscr();printfで輸入原字符串:")；gets(str);prin氓"輸入子字符串:");gets(substr);puts(str);puts(substr);n=findStr(str,substr);printfCn=%d\n”,n);ReadWrite();}ReadWriteO(charstr[81],substr[3],ch;intn,len,i=0;FILE*rf,*wf;rf=fbpen(nin.datM,V);wf=fbpen(”〇ut.dat”,W);while(i<25){fgets(str,80,rf);fgets(substr,10,rf);len=strlen(substr)-1;ch=substr[len];if(ch=V||ch=Oxla)substr[len]=0;n=findStr(str,substr);fprintfifwf,n%d\n",n);i卄;}fclose(rf);fclose(wf);}★題目20(Fibonacci數(shù)列題)編寫函數(shù)jsValue,它的功能是:求Fibonacci數(shù)列中大于t的最小的ー個(gè)數(shù),結(jié)果由函數(shù)返回。其中Fibonacci數(shù)列F(n)的定義為:F(0)=0,F(l)=lF(n)=F(n-l)+F(n-2)最后調(diào)用函數(shù)writeDat。讀取50個(gè)數(shù)據(jù)t,分別得出結(jié)果且把結(jié)果輸出到文件out.dat中。例如:當(dāng)41000時(shí),函數(shù)值為:1597〇部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main()和寫函數(shù)writeDat()的內(nèi)容。#include<stdio.h>intjsValue(intt){intfO=O,fl=l,fn;fn=fO+fl;while(fn<=t){fO=fl;fl=fn;fn=fO+fl;}returnfn;main(){intn;n=1000;printf(nn=%d,f=%d\nn,n,jsValue(n));writeDat();}writeDat()(FILE*in,*out;inti,n,s;in=fbpen(Min.datM,MrM);out=fbpen("〇ut.daピJw")；fbr(i=0;i<50;i-H-){fscanf(in,"％d”,&n);s=jsValue(n);printf(M%d\nM,s);fprintf(out,M%d\nM,s);fclose(in);fclose(out);}☆題目21(迭代方法求方程題)下列程序progl.c的功能是:利用以ド所示的簡(jiǎn)單迭代方法求方程:cos(x)-x=0的ー個(gè)實(shí)根。Xn+l=cos(Xn)迭代步驟如下：⑴取XI初值為0.0；(2)XO=X1,把XI的值賦給X0；⑶Xl=cos(X0),求出ー個(gè)新的XI：(4)若X0-X1的絕對(duì)值小于0.000001,執(zhí)行步驟(5),否則執(zhí)行步驟(2)：(5)所求X!就是方程cos(X)-X=0的ー個(gè)實(shí)根,作為函數(shù)值返回。請(qǐng)編寫函數(shù)countValue。實(shí)現(xiàn)程序的要求，最后調(diào)用函數(shù)writeDat()把結(jié)果輸出到文件OUT17.DAT中。部分源程序已給出。請(qǐng)勿改動(dòng)主函數(shù)main。和輸出數(shù)據(jù)函數(shù)writeDat。的內(nèi)容。#includc<conio.h>#include<math.h>#includc<stdio.h>floatcountValue(){floatxO,xl;xl=0.0;do{xO=xl;xl=cos(xO);}while(fabs(xO-xl>>=0.000001);returnxl;}main(){clrscr();printff'實(shí)根=%f\n”,countValue());printf(M%f\nn,cos(countValue())-countValue());writeDat();}writeDat()IFILE*wf;wf=fbpen(nOUT17.DAT”,”w");fprintfitwf/%fXn\countValueO);fclose(wf);}注:本題在無(wú)憂或捷成模擬盤中,需定義doublexO^xl;才能通過(guò),據(jù)實(shí)際上機(jī)抽到該題的考生反映,實(shí)際上機(jī)需按上面解法的定義方能通過(guò),特此說(shuō)明,供參考。★題目22（平方根問(wèn)題）請(qǐng)編寫函數(shù)countValue。，它的功能是:求n以內(nèi)（不包括n）同時(shí)能被3與7整除的所有自然數(shù)之和的平方根s,并作為函數(shù)值返回,最后結(jié)果s輸出到文件。utdat中。例如若n為1000時(shí),函數(shù)值應(yīng)為：s=l53.909064?部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main（）和輸入輸出數(shù)據(jù)函數(shù)progRcadWrite。的內(nèi)容。#include<conio.h>#includc<math.h>#include<stdio.h>doublecountVa)ue(intn){inti;doubles=0.0;for(i=l;i<n;i++)if(i%21==0)s+=i;returnsqrt(s);}main(){clrscr();printf("自然數(shù)之和的平方根=%f\n”,countVakie(1000));progReadWrite();}progRcadWrite(){FILE*fp,*wf;inti,n;floats;fp=fbpen(Min.dat\"r");if(fp==NULL){printff數(shù)據(jù)文件in.dat不存在!”)；return;}wf=fopen(”〇ut.dat”,”w”)；fbr(i=0;i<10;i-H-){fscanf(fp,"%d\n”,&n);s=countValue(n);fprintfi(wf；,%f\n,,,s);fclose(fp);fclose(wf);題目23（實(shí)數(shù)運(yùn)算題）已知在文件in.dat中存有N個(gè)(個(gè)數(shù)〈200)實(shí)數(shù),函數(shù)readdat()讀取這N個(gè)實(shí)數(shù)并存入數(shù)組xx中。請(qǐng)編制函數(shù)calva加e(),其功能要求:1>求出這N個(gè)實(shí)數(shù)的平均值aver；2、分別求出這N個(gè)實(shí)數(shù)的整數(shù)部分之和sumint以及小數(shù)部分之和sumdec,最后調(diào)用函數(shù)writedat()把所求的結(jié)果輸出到文件out.dat中。注意:部分源程序已給出。請(qǐng)勿改動(dòng)主函數(shù)main。、讀數(shù)據(jù)函數(shù)readdat。和輸出數(shù)據(jù)函數(shù)writedat。的內(nèi)容。#includc<stdio.h>#include<conio.h>#dcfineMAXNUM200floatxx[MAXNUM];intN=0;/?文件IN.DAT中共有多少個(gè)實(shí)數(shù)?/doubleaver=0.0;/?平均值?/doublesumint=0.0;/?整數(shù)部分之和*/doublesumdec=0.0;/?小數(shù)部分之和*/intReadDat(void);voidWriteDat(void);voidCalValue(void){inti;for(i=0;i<N;i++){sumint+=(long)xx[i];sumdec+=xx[i]-(long)xx[i];aver+=xx[i];}aver/=N;}voidmain(){inti;clrscr();fbr(i=0;i<MAXNUM;i++)xx[i]=0;ifi(ReadDat()){printff數(shù)據(jù)文件IN.DAT不能打開!'007\n");return;)Calvalue();printff文件!N.DAT中共有實(shí)數(shù)=%d個(gè)'n”,N);printfT平均值=%.2If\n”,aver);printfi("整數(shù)部分之和=%.21加”,sumint);printf(”小數(shù)部分之和=%.21仙”,sumdec);WriteDat();system("pauseM);intRcadDat(void){FILE*fp;inti=0;if((fp=fbpen("in.dat”,"ピ))==NULL)return1;while(!feof(fp)){fscanfi(fp,n%d,H,&xx[i-H-]);}fclose(fp);return0;}voidWriteDat(void)(FILE*fp;fp=fbpen(”〇UT.DAT",“w”);fprintflffp,n%.21f\n%.21f\n%.21f\nM,aver,sumint,sumdec);fclose(fp);}題目24(完全平方數(shù)問(wèn)題)下列程序progl.c的功能是:在三位整數(shù)(100至999)中尋找符合條件的整數(shù)并依次從小到大存入數(shù)組中;它既是完全平方數(shù),又是兩位數(shù)字相同,例如144、676等。請(qǐng)編制函數(shù)實(shí)現(xiàn)此功能,滿足該條件的整數(shù)的個(gè)數(shù)通過(guò)所編制的函數(shù)返回。最后調(diào)用函數(shù)writeDat()把結(jié)果輸出到文件out.dat中。請(qǐng)勿改動(dòng)主函數(shù)main()和寫函數(shù)writeDat。的內(nèi)容。#include<stdio.h>intjsValue(intbb[]){intkj,k=O;inthun,ten,data;for(i=10;i<32;i++)hum=j/100;ten=j%100/10;data=j%10;if(hum==tenllhum==datallten==data)bb[k++]=j;}returnk;)main(){intb[20],num;num=jsValuc(b);writeDat(num,b);}writcDat(intnum,intb[])(FILE*out;inti;out=fopen(Mout.datn,MwM);printf(M%d\n",num);fprintf(out,M%d\nM,num);fbr(i=O;i<num;i++){printf(M%d\n",b[i]);fprintf(out,M%d\n,l,b[i]);}fclose(out);}★題目25(回文數(shù)問(wèn)題)下列程序的功能是:尋找并輸出11至999之間的數(shù)m,它滿足m,m2和m3均為回文數(shù)。所謂回文數(shù)是指其各位數(shù)字左右對(duì)稱的整數(shù),例如121,676,94249等。滿足上述條件的數(shù)如m=lI,m2=121,m3=1331皆為回文數(shù)。請(qǐng)編制函數(shù)intsvalue(longm)實(shí)現(xiàn)此功能,如果是回文數(shù),則函數(shù)返回1,反之則返回。。最后把結(jié)果輸出到文件。ut.dat中。注意:部分源程序已給出。請(qǐng)勿改動(dòng)主函數(shù)main。的內(nèi)容。#include<stdio.h>intjsValue(longn){inti,strl,half;charxy[20];^(^(必ズ必10);/*注意這里不能使用"〇川)函數(shù),因?yàn)閚是long型的?/strl=strlen(xy);half=strl/2;for(i=0;i<half;i++)if(xy[i]!=xy[-strl])break;if(i>=half)return1;elsereturn0;}main(){longm;FILE*out;out=fdpen(Mout.dat,\Mwn);fbr(m=ll;m<1OOO;m-H-){if(jsValue(m)&&jsValue(m*m)&&jsValue(m*m*m)){printf(,,m=%41d,m*m=%61d,m*m*m=%81d\nH,m,m*m,m*m*m);fprintfi(out,"m=%41d,m*m=%61d,m*m*m=%81d\nM,m,m*m,m*m*m);}.}fclose(out);system("pauseM);或者卜?面的解法:intjsValue(longn){longints=0,k;k=n;while(k){s=s*10+k%10;k/=10;)if(s==n)return1;if(s!=n)return0;輸出結(jié)果為:m= 121,m*m*m= 1331m=101,m*m=10201,m*m*m=1030301m=lll,m*m=12321,m*m*m=1367631★☆題目26(整數(shù)統(tǒng)計(jì)運(yùn)算題)已知在文件IN.DAT中存有若干個(gè)(個(gè)數(shù)<200)四位數(shù)字的正整數(shù),函數(shù)ReadDat()讀取這若干個(gè)正整數(shù)并存入數(shù)組xx中。請(qǐng)編制函數(shù)CalValue。,其功能要求:1、求出這文件中共有多少個(gè)正整數(shù)totNum；2、求這些數(shù)右移1位后,產(chǎn)生的新數(shù)是偶數(shù)的數(shù)的個(gè)數(shù)totCnt,以及滿足此條件的這些數(shù)(右移前的值)的算術(shù)平均值totPjz,最后調(diào)用函數(shù)writeDat。把所求的結(jié)果輸出到文件OUT.DAT中。部分源程序存在文件progl.c中。請(qǐng)勿改動(dòng)主函數(shù)main()、讀函數(shù)ReadDat()和寫函數(shù)writeDat()的內(nèi)容。#include<stdio.h>#include<conio.h>#defineMAXNUM200intxx[MAXNUM];inttotNum=0;/?文件!N.DAT中共有多少個(gè)正整數(shù)?/inttotCnt=0;/*符合條件的正整數(shù)的個(gè)數(shù)?/doubletotPjz=0.0; /?平均值?/intReadDat(void);voidwriteDat(void);voidCalValue(void){inti,data;for(i=0;i<MAXNUM;i++)if(xx[i]>0){totNum++;data=xx[i]?l;if(data%2==0){totCnt++;totPjz+=xx[i];}}if(totCnt==0)totPjz=0;elsetotPjz/=totCnt;}voidmain(){inti;clrscr();fbr(i=O;i<MAXNUM;i++)xx[i]=O;if(ReadDat()){printff數(shù)據(jù)文件!N.DAT不能打開ハ0075")；return;}CalValueQ;printf("文件!N.DAT中共有正整數(shù)=%d個(gè)\n1〇tNum);printf(”符合條件的正整數(shù)的個(gè)數(shù)=%d個(gè)、パ,totCnt);prin氓”平均值=%.2f\パ,totPjz);writeDatQ;}intReadDat(void){FILE*fp;inti=0;i負(fù)(中=fbpen(”lN.DAT”,”r"))==NULL)return1;while(!feof(fp)){fscanf(加,”％d,”,&xx[i++]);}fclose(fp);return0;}voidwriteDat(void)FILE*fp;fp=fbpen(MOUT.DATM,"wM);-rintf(電"％d\n%d\n%6.2f\n”,totNum,totCnt3otPjz);fclose(fp);}題目27(整數(shù)各位數(shù)字運(yùn)算題)已知數(shù)據(jù)文件in.dat中存有300個(gè)四位數(shù),并已調(diào)用讀函數(shù)ReadDat。把這些數(shù)存入數(shù)組a中,請(qǐng)編制ー函數(shù)j§Vahie(),其功能是:求出千位數(shù)上的數(shù)減百位數(shù)上的數(shù)減十位數(shù)上的數(shù)減個(gè)位數(shù)上的數(shù)大于零的個(gè)數(shù)ent,再把所有滿足此條件的四位數(shù)依次存入數(shù)組b中,然后對(duì)數(shù)組b的四位數(shù)按從小到大的順序進(jìn)行排序,最