☆題Fl1

請編寫一個函數(shù)jsValuc(intm,intxx[]),該函數(shù)的功能是：將大于整數(shù)m且緊靠m的k個素數(shù)存入數(shù)組xx傳回。

最后調(diào)用函數(shù)writeDat。讀取10組數(shù)據(jù)，分別得出結(jié)果且把結(jié)果輸出到文件out.dat中。

部分源程序存在文件prog1.c中。

例如:若輸入175則應(yīng)輸出：19,23,29,31,37。

請勿改動主函數(shù)main。和寫函數(shù)writeDat。的內(nèi)容。

intisP(intm)

inti;

for(i=2;i<m;i++)

if(m%i==O)return0;

return1;

)

voidnum(intm,intk,intxx[])

{ints=0;

for(m=m+l;k>0;m++)

if(isP(m)){xx[s++]=m;k-;}

)

★WFI"..............................................................

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDat。把這些數(shù)存入數(shù)組a中，請考生編制一函數(shù)jsVai。，其功能

是：如果四位數(shù)各位上的數(shù)字均是0或2或4或6或8,則統(tǒng)計出滿足此條件的個數(shù)ent,并把這些四位數(shù)按從大到小的順序存入

數(shù)組b中。最后main(涵數(shù)調(diào)用寫函數(shù)writeDat。把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal()

{inti,j,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<cnt;j++)

if(b[i]<b[j]){qw=b[i];b[i]=bU];b[j]=qw;}

)

★題目3(字符型題)

函數(shù)ReadDat()實現(xiàn)從文件IN.DAT中讀取一篇英文文章存入到字符串?dāng)?shù)組xx中；請編制函數(shù)StrOR(),其函數(shù)的功能是：以行為

單位依次把字符串中所有小寫字母o左邊的字符串內(nèi)容移到該串的右邊存放，然后把小寫字母。刪除，余下的字符串內(nèi)容移到已處

理字符串的左邊存放，之后把已處理的字符串仍按行重新存入字符串?dāng)?shù)組xx中。最后main。函數(shù)調(diào)用函數(shù)WriteDat。把結(jié)果xx輸

出到文件OUT5.DAT中

voidStrOR(void)

{inti,righto,j,s,k;

chartem[80];

for(i=0;i<maxline;i++)

for(j=strlen(xx[i])-l;j>=O;j-)

{k=0；

memset(tem,0,80);

{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]!=d)

tem[k++]=xx[i][s];

strcpy(xx[i],tem);

)

elsecontinue;

)

)

★if'i"..............................................................................................................................................................................

函數(shù)ReadDal()實現(xiàn)從文件IN.DAT中讀取一篇英文文章存入到字符串?dāng)?shù)組xx中，請編制函數(shù)StrOL(),其函數(shù)的功能是：以行為

單位對行中以空格或標點符號為分隔的所有單詞進行倒排。最后把一處理的字符串(應(yīng)不含標點符號)仍按行重新存入字符串?dāng)?shù)組

xx中，最后調(diào)用函數(shù)writeDat。把結(jié)果xx輸出到文件OUT6.DAT中。

例如:原文：YouHeMe

Iamastudent.

結(jié)果：MeHe

studentaamI

voidStrOL(void)

{int

charstr[80];

for(i=0;i<maxline;i++)

{strl=strlen(xx[i]);

memset(str,0,80);

s=k=0;

for(j=strl-l;j>=0;j-)

{if(isalpha(xx[i][j]))k++;

else{for(m=l;m<=k;m++)

str[s++]=xx[i][j+mJ;

k=0;

}

if(!isalpha(xx[i][j]))

str[s++>**;

}

fbr(m=l;m<=k;m++)

str[s++]=xx[i][j+m];

str[s]=>\0';

strcpy(xx[i]^tr);}

☆題目5(整數(shù)排序題)

在文件in.dal中有200個正整數(shù)，且每個數(shù)均在1000至9999之間。函數(shù)ReadDal()讀取這200個數(shù)存放到數(shù)組aa中。請編制函數(shù)

jsSortO,其函數(shù)的功能是：要求按每個數(shù)的后三位的大小進行升序排列，然后取出滿足此條件的前10個數(shù)依次存入數(shù)組bb中，

如果后三位的數(shù)值相等，則按原先的數(shù)值進行降序排列。最后調(diào)用函數(shù)WriteDat。把結(jié)果bb輸出到文件out.dat中。

例：處理前60125099901270258088

處理后90126012702580885099

voidjsSort()

(

intij,data;

for(i=0;i<l99;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[i]=aa[j];aa[j]=data;}

for(i=0;i<10;i++)

bb[i]=aa[i];

L*

☆題Fl6正整數(shù)排序

在文件in.dat中有200個正整數(shù)，且每個數(shù)均在1000至9999之間。函數(shù)ReadDat。讀取這200個數(shù)存放到數(shù)組aa中。請編制函數(shù)

jsSort。，其函數(shù)的功能是：要求按每個數(shù)的后三位的大小進行降序排列，然后取出滿足此條件的前10個數(shù)依次存入數(shù)組b中，如

果后三位的數(shù)值相等，則按原先的數(shù)值進行升序排列。最后調(diào)用函數(shù)WriteDatO把結(jié)果bb輸出到文件out.dat中。

例：處理前90125099601270258088

處理后50998088702560129012

voidjsSort()

(

inti,j,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[i]=aa[j];aa[JJ=data;}

for(i=0;i<10;i++)

bb[i]=aa[i];

!*****************************************火****************************

☆題目7(結(jié)構(gòu)體操作題)

已知在文件IN.DAT中存有100個產(chǎn)品銷售記錄，每個產(chǎn)品銷售記錄由產(chǎn)品代碼dm(字符型4位)，產(chǎn)品名稱me(字符型10位)，單

價dj(整型)，數(shù)量si(整型)，金額je(長整型)五部分組成。其中：金額=單價*數(shù)量計算得出。函數(shù)ReadDat。是讀取這100個銷售記

錄并存入結(jié)構(gòu)數(shù)組sell中。請編制函數(shù)SortDat。，其功能要求：按產(chǎn)品代碼從大到小進行排列，若產(chǎn)品代碼相同，則按金額從大

到小進行排列，最終排列結(jié)果仍存入結(jié)構(gòu)數(shù)組sell中，最后調(diào)用函數(shù)WriteDatO把結(jié)果輸出到文件OUT6.DAT中。

voidSortDatO

{inti,j;

PROxy;

for(i=0;i<99;i++)

for(j=i+l;j<100;j++)

if(strcmp(sell[i].dm^ell[j].dni)<Ollstrcmp(selI[i].dm^ell|jJ.din)==O&&sell[i].je<sell|j].je)

{xy=sell[i];sell[i]=sell|j];sell[j]=xy;}

[*****************************************?**********************

★題口8(字符替換題)

函數(shù)ReadDat。實現(xiàn)從文件ENGIN中讀取一篇英文文章，存入到字符串?dāng)?shù)組xx中；請編制函數(shù)encryptChar。，按給定的替代關(guān)系

對數(shù)組xx中的所有字符進行替代，仍存入數(shù)組xx的對應(yīng)的位置上，最后調(diào)用函數(shù)WriteDaK)把結(jié)果xx輸出到文件PS1.DAT中。

替代關(guān)系：f(p)=p*llmod256(p是數(shù)組中某一個字符的ASCII值，f(p)是計算后新字符的ASCII值)，如果計算后f(p)值小于

等于32或大于130,則該字符不變，否則將f(p)所對應(yīng)的字符進行替代。(注意中間變量用無符號整型)，部分源程序存在文件progl.c

中。原始數(shù)據(jù)文件存放的格式是：每行的寬度均小于80個字符。

voidencryptChar()

{intij;

for(i=0;i<maxline;i++)

for(j=0;j<strlen(xx[i]);j++)

if(xx[i][j]*ll%256<=32llxx[i]|j]*ll%256>130)continue;

elsexx[i][j]=xx[i][j]*ll%256;

L*******************************w**************w******

★☆題目9(字符串排序題)

函數(shù)ReadDal。實現(xiàn)從文件IN.DAT中讀取一篇英文文章存入到字符串?dāng)?shù)組xx中，請編制函數(shù)SortCharD。，其函數(shù)的功能是：以

行為單位對字符按從大到小的順序進行排序，排序后的結(jié)果仍按行重新存入字符串?dāng)?shù)組xx中，最后調(diào)用函數(shù)writeDat。把結(jié)果xx

輸出到文件OUT2.DAT中。

例：原文：dAe,BfC.

CCbbAA

結(jié)果：fedCBA.

bbCCAA

voidSortCharD(void)

{inti,j,k,strl;

charch;

for(i=0;i<maxline;i++)

{strl=strlen(xx[i]);

for(j=0;j<strl-1J++)

for(k=j+l;k<strl;k++)

if(xx[i]U]<xx[i][k])

{ch=xx[i][j];xx[i][j]=xx[i][k];xx[i][k]=ch;}

)

★☆題目10(替換字符題)

函數(shù)ReadDat()實現(xiàn)從文件IN.DAT中讀取一篇英文文章存入到字符串?dāng)?shù)組xx中，請編制函數(shù)ConvertCharA(),其函數(shù)的功能是：

以行為單位把字符串中的所有小寫字母改寫成該字母的下?個字母，如果是字母z,則改寫成字母ao大寫字母仍為大寫字母，小

寫字母仍為小寫字母，其他字符不變。把已處理的字符串仍按行重新存入字符串?dāng)?shù)組xx中，最后調(diào)用函數(shù)writeDat。把結(jié)果xx輸

出到文件OUTI.DAT中。

例：原文：Adb.Bcdza

abck.LLhj

結(jié)果：Aec.Bdeab

bcdl.LLik

voidConvertCharA(void)

{intiJ;

for(i=0;i<maxline;i++)

{for(j=0;j<strlen(xx[i]);j++)

if(xx[i][j]==,z')xx[i][j]='a'；

elsexx[i][j]+=l;

)

!****************去****************************************%*****女******

☆題目11(字符串字母移位題)

程序progl.c的功能是：把s字符串中的所有字母改寫成該字母的下一個字母，字母z改寫成字母a。要求大寫字母仍為大寫字母，

小寫字母仍為小寫字母，其它字符不做改變。

請考生編寫函數(shù)chg(char*s)實現(xiàn)程序要求，最后調(diào)用函數(shù)readwriteDAT()把結(jié)果輸出到文件be1.out中。

例如：s字符串中原有的內(nèi)容為：Mn.l23Zxy,則調(diào)用該函數(shù)后，結(jié)果為：No.l23Ayz。

voidchg(char*s)

{intI;

for(I=0;I<strlen(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;

」**********************內(nèi)**********************內(nèi)*******火******火*****斤****

★☆題目12(結(jié)構(gòu)體運算題題)

已知在文件IN.DAT中存有100個產(chǎn)品銷售記錄，每個產(chǎn)品銷售記錄由產(chǎn)品代碼dm(字符型4位)，產(chǎn)品名稱me(字符型10位)，單

價dj(整型)，數(shù)量si(整型)，金額je(長整型)五部分組成。其中：金額=單價*數(shù)量計算得出。函數(shù)ReadDal()是讀取這100個銷售記

錄并存入結(jié)構(gòu)數(shù)組sell中。請編制函數(shù)SortDatO，其功能要求：

按產(chǎn)品名稱從小到大進行排列，若產(chǎn)品名稱相等，則按金額從小到大進行排列，最終排列結(jié)果仍存入結(jié)構(gòu)數(shù)組sell中，

voidSortDatO

{inti,j;

PROxy;

for(i=0;i<99;i++)

for(j=i+l;j<100;j++)

if(strcmp(sell[i].mc,sell[j].inc)>Ollstrcnip(sell[i].mc,sell[J].mc)==O&&sell[i].je>sell[j].jc)

{xy=sell[i];sen[i]=sell[j];sell[j]=xy;}

題目13(結(jié)構(gòu)體運算題)

已知在文件IN.DAT中存有100個產(chǎn)品銷售記錄，每個產(chǎn)品銷售記錄由產(chǎn)品代碼dm(字符型4位)，產(chǎn)品名稱me(字符型10位)，單

價dj(整型)，數(shù)量si(整型)，金額je(長整型)五部分組成。其中：金額=單價*數(shù)量計算得出。函數(shù)ReadDat()是讀取這100個銷售記

錄并存入結(jié)構(gòu)數(shù)組sell中。請編制j函數(shù)SortDatO，其功能

要求：按產(chǎn)品代碼從小到大進行排列，若產(chǎn)品代碼相等，則按金額從大到小進行排列，最終排列結(jié)果仍存入結(jié)構(gòu)數(shù)組sell中，最后

調(diào)用函數(shù)WritcDat。把結(jié)果輸出到文件OUT9.DAT中。

voidSortDatO

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].dinsell|j].<lin)==0&&sell[i].je<sell[j].je)

{xy=sell[i];sell[i]=seli[j];sell|j]=xy;)9

!*火******號****-*?*”&**?**

★☆題目14(整數(shù)統(tǒng)計排序題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)rcadDat。把這些數(shù)存入數(shù)組a中，請考生編制?函數(shù)jsVal。，其功能

是：依次從數(shù)組a中取出個四位數(shù)，如果該四位數(shù)連續(xù)大于該四位數(shù)以后的五個數(shù)且該數(shù)是奇數(shù)(該四位數(shù)以后不滿五個數(shù)，則

不統(tǒng)計)，則統(tǒng)計出滿足此條件的個數(shù)ent并把這些四位數(shù)按從小到大的順序存入數(shù)組b中，最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent

以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal()

{inti,j,flag;

for(i=0;i<MAX-5;i++)

{for(j=i+l;j<=i+5;j++)

if(a[i]>a[j]&&a[i]%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]){flag=b[i];b[i]=b[j];b[j]=flag;}

)

*********************************************************************

★題Fl15(整數(shù)各位數(shù)字運算排序題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)rcadDat。把這些數(shù)存入數(shù)組a中，請考生編制?函數(shù)jsVal(),其功能

是：若個四位數(shù)的千位數(shù)字上的值小于等于百位數(shù)字上的值，百位數(shù)字上的值小于等于十位數(shù)字上的值，以及十位數(shù)字上的值小

于等于個位數(shù)字上的值，并且原四位數(shù)是偶數(shù)，則統(tǒng)計出滿足此條件的個數(shù)ent并把這些四位數(shù)按從小到大的順序存入數(shù)組b中，

最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal()

{inti,j;

intqw,bw^w,gw;

for(i=0;i<MAX;i++)

{<Iw=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]>bU]){qw=b[i];b[i]=bU];bU]=qw;}

)

***************************************************************************

★☆題目16(字符替換題)

函數(shù)ReadDat。實現(xiàn)從文件IN.DAT中讀取一篇英文文章存入到字符半數(shù)組xx中，請編制函數(shù)StrCharJR。，其函數(shù)的功能是：以

行為單位把字符串中所有字符的ASCII值右移4位，然后把右移后的字符ASCII值再加上原字符的ASCII值，得到新的字符仍存

入原字符串對應(yīng)的位置上。最后把已處理的字符串仍按行重新存入字符串?dāng)?shù)組xx中，最后調(diào)用函數(shù)wrileDat()把結(jié)果xx輸出到文

件OUT8.DAT中o

voidStrCharJR()

{inti,j;

for(i=0;i<maxline;i++)

for(j=0;j<strlen(xx[i]);j++)

xx[i][j]+=(xx[i][j]?4);(右移四位的表達方式)

)

**********************************************************************

☆題目17(親朋字符替換題)

函數(shù)READDAT()實現(xiàn)從文件IN.DAT中讀取?篇英文文章存入到字符串?dāng)?shù)組XX中;請編制函數(shù)CHA(),其函數(shù)功能是:以行為單

位把字符串中的第一個字符的ASCII值加第二個字符的ASCII值，得到第一個親朋字符，第二個字符的ASCII值加第一:個字符的

ASCII值，得到第二個新字符，依此類推百.處理到最后第：個字符，最后一個字符的ASCH值加原第一個字符的ASCII值，得到

最后一個新的字符，得到的新字符分別存放在原字符串對應(yīng)的位置上。最后把已處理的字符串逆轉(zhuǎn)后按行重新存入字符中數(shù)組XX

中,最后調(diào)用函數(shù)WRITEDAT()把結(jié)果XX輸出到文件OUT9.DAT也原始數(shù)據(jù)文件存放的格式是:每行的寬度均小于80個字符，含標

點符號和空格.

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]);

☆題目18

函數(shù)ReadDat()實現(xiàn)從文件ENGIN中讀取,篇英文文章，存入到字符串?dāng)?shù)組xx中；請編制函數(shù)encryptChar。，按給定的替代關(guān)系

對數(shù)組xx中的所有字符進行替代，仍存入數(shù)組xx的對應(yīng)的位置上，最后調(diào)用函數(shù)WriteDat。把結(jié)果xx輸出到文件PS10.DAT中。

替代關(guān)系：f(p)=p*11mod256(p是數(shù)組中某一個字符的ASCII值，f(p)是計算后新字符的ASCII值)，如果原字符的ASCH值

是偶數(shù)或計算后f(p)值小于等于32,則該字符不變，否則將f(p)所對應(yīng)的字符進行替代。

voidencryptChar()

{intij;

for(i=0;i<maxline;i++)

for(j=0;j<strlen(xx[i]);j++)

if(xx[i][j]*ll%256<=32llxx[i][j]%2==0)continue;

elsexx[i][j]=xx[i][j]*ll%256;

******************************************************************************

☆題目19(單詞個數(shù)統(tǒng)計題)

編寫一個函數(shù)findStr(char*str,char*substr),該函數(shù)統(tǒng)tl-■個長度為2的子字符串在另一個字符串中出現(xiàn)的次數(shù)。例如，假定輸

入的字符串為”asdasasdfgasdaszx67asdmklo”，子字符串為“as"，函數(shù)返回值是6。(表明了返I川值是整數(shù)型)

函數(shù)ReadWrite。實現(xiàn)從文件in.dat中讀取兩個字符串，并調(diào)用函數(shù)findStr(),最后把結(jié)果輸出到文件out.dat中。

intfindStr(char*str,char*substr)

{intiJ,lenIJen2,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;

!**

★題目20(Fibonacci數(shù)列題)

編寫函數(shù)jsVakie,它的功能是：求Fibonacci數(shù)列中大于I的最小的一個數(shù)，結(jié)果由函數(shù)返回。其中Fibonacci數(shù)列F(n)的定義為：

F(0)=0,F(l)=l

F(n)=F(n-1)+F(n-2)

最后調(diào)用函數(shù)writeDat。讀取50個數(shù)據(jù)t,分別得出結(jié)果且把結(jié)果輸出到文件out.dat中。

例如：當(dāng)=1000時,函數(shù)值為：1597。

intjsValue(intt)

{intf()=O,fl=l,fn;

fn=fO+H;

while(fn<=t)

{fO=fl;

fl=fn;

fn=fl)+fl;

)

returnfn;

)

****************************************************************************

☆題目21(迭代方法求方程題)

下列程序progLc的功能是：利用以下所示的簡單迭代方法求方程：cos(x)-x=()的一個實根。

Xn+l=cos(Xn)

迭代步驟如下：

⑴取XI初值為0.0i

(2)X0=Xl,把XI的值賦給X0；

(3)Xl=cos(X0),求出?個新的XI；

(4)若X0-X1的絕對值小于0.000001,執(zhí)行步驟(5),否則執(zhí)行步驟(2)；

(5)所求X1就是方程cos(X)-X=0的一個實根，作為函數(shù)值返回。

請編寫函數(shù)countValue。實現(xiàn)程序的要求，最后調(diào)用函數(shù)writeDat()把結(jié)果輸出到文件OUT17.DAT中。

floatcountValueO

{floatx0,xl;

xl=0.0;

do{x0=xl;

xl=cos(x0);

}while(fabs(x0-xl)>=0.000001);

returnxl;

)

注：本題在無憂或捷成模擬盤中，需定義doublex0,xl;才能通過，據(jù)實際上機抽到該題的考生反映，實際上機需按上面解法的定義

方能通過，特此說明，供參考。

★題目22(平方根問題)

請編寫函數(shù)countVahie。，它的功能是：求n以內(nèi)(不包括n)同時能被3與7整除的所有自然數(shù)之和的平方根s,并作為函數(shù)值返

回，最后結(jié)果s輸出到文件out.dat中。

例如若n為1000時，函數(shù)值應(yīng)為：s=153.909064.,

doublecountValue(intn)

{inti;

doubles=0.0;

for(i=l;i<n;i++)

if(i%21==0)s+=i;

returnsqrt(s);

!**

題目23(實數(shù)運算題)

LA知在文件in.dat「I」存有N個(個數(shù)<200)實數(shù)，函數(shù)readdal。讀取這N個實數(shù)并存入數(shù)組xx中。請編制函數(shù)calvahie(),其功能

要求：

1、求出這N個實數(shù)的平均值aver：

2、分別求出這N個實數(shù)的整數(shù)部分之和sumint以及小數(shù)部分之和sumdec,最后調(diào)用函數(shù)writedat。把所求的結(jié)果輸出到文件out.dat

中。

注意：部分源程序已給出。

voidCalValue(void)

{inti;

for(i=0;i<N;i++)

{sumint+=(long)xx[i];

sumdec+=xx[i]-(long)xx[i];

aver+=xx[i];

)

aver/=N;

)

****************************************************************************

題目24(完全平方數(shù)問題)

下列程序progl.c的功能是：在三位整數(shù)(100至999)中尋找符合條件的整數(shù)井依次從小到大存入數(shù)組中；它既是完全平方數(shù)，乂

是兩位數(shù)字相同，例如144、676等。

請編制函數(shù)實現(xiàn)此功能，滿足該條件的整數(shù)的個數(shù)通過所編制的函數(shù)返"I。

intjsValue(intbb[])

{inti,j,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;

)

*****************************************************************

★題目25(回文數(shù)問題)

下列程序的功能是：尋找并輸出11至999之間的數(shù)m,它滿足m,m2和m3均為回文數(shù)。所謂回文數(shù)是指其各位數(shù)字左右對稱的整

數(shù)，例如⑵,676,94249等。滿足上述條件的數(shù)如I.m2=121,m3=1331皆為回文數(shù)。請編制函數(shù)intsvalue(longm)實現(xiàn)此功

能，如果是回文數(shù),則函數(shù)返回1,反之則返回0。最后把結(jié)果輸出到文件。utdat中。

intjsValue(longn)

{inti^trl,half;

charxy[20];

13(11,*%10);/*注意這里不能使用10@()函數(shù),因為n是1ong型的*/

strl=strlen(xy);

half=strl/2;

for(i=0;i<half;i++)

if(xy[i]!=xy[—strl])break;

if(i>=half)return1;

elsereturn0;

或者下面的解法：

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=ll,m*m=121,m*m*m=1331

m=101,m*ni=10201,m*m*m=1030301

m=lll,ni*m=12321,m*m*m=1367631

★☆題目26(整數(shù)統(tǒng)計運算題)

已知在文件IN.DAT中存有若干個(個數(shù)<200)四位數(shù)字的正整數(shù)，函數(shù)ReadDat。讀取這若干個正整數(shù)并存入數(shù)組xx中。請編制

函數(shù)CalValueO,其功能要求：I、求出這文件中共有多少個正整數(shù)totNum；2、求這些數(shù)右移1位后，產(chǎn)生的新數(shù)是偶數(shù)的數(shù)的個

數(shù)totCnt,以及滿足此條件的這些數(shù)(右移前的值)的算術(shù)平均值totPjz,最后調(diào)用函數(shù)writeDat。把所求的結(jié)果輸出到文件OUT.DAT

中。

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;

)

********************************************************************

題目27(整數(shù)各位數(shù)字運算題)

已知數(shù)據(jù)文件in.dat中存有300個四位數(shù)，并已調(diào)用讀函數(shù)RcadDat。把這些數(shù)存入數(shù)組a中，請編制?函數(shù)jsVahie。，其功能是：

求出千位數(shù)上的數(shù)減百位數(shù)上的數(shù)減十位數(shù)上的數(shù)減個位數(shù)上的數(shù)大于零的個數(shù)ent,再把所有滿足此條件的四位數(shù)依次存入數(shù)組

b中，然后對數(shù)組b的四位數(shù)按從小到大的順序進行排序，最后調(diào)用寫函數(shù)writeDat。把結(jié)果輸出到out.dat文件。

例如:9123,9-1-2-3>0,則該數(shù)滿足條件存入數(shù)組b中,且個數(shù)cm=cm+l。

9812,9-8-1-2>0,則該數(shù)不滿足條件忽略。

jsValue()

{inti,j,qw,bw,sw,gw;

for(i=0;i<300;i++)

{qw=a[i]/1000;bw=a[i]/100%10;

sw=a[i]%100/10;gw=a[i]%10;

if(qw-bw-sw-gw>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[l]=b[j];b[j]=qw;}

)

************************************************************************

★☆題目28(整數(shù)各位打散組合運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)rcadDat。把這些數(shù)存入數(shù)組a中，請考生編制?函數(shù)jsVal(),其功能

是：把千位數(shù)字和十位數(shù)字重新組成?個新的十位數(shù)ab(新十位數(shù)的十位數(shù)字是原四位數(shù)的千位數(shù)字,新十位數(shù)的個位數(shù)字是原

四位數(shù)的十位數(shù)字)，以及把個位數(shù)字和百位數(shù)字組成另一個新的十位數(shù)cd(新十位數(shù)的十位數(shù)字是原四位數(shù)的個位數(shù)字，新十位

數(shù)的個位數(shù)字是原四位數(shù)的仃位數(shù)字)，如果新組成的兩個十位數(shù)ab-cd>=0且ab-cd<=10且兩個數(shù)均是奇數(shù)，同時兩個新數(shù)的十位

數(shù)字均不為零，則將滿足此條件的四位數(shù)按從大到小的順序存入數(shù)組b中，并要計算滿足上述條件的四位數(shù)的個數(shù)加。最后main()

函數(shù)調(diào)用寫函數(shù)writeDat()把結(jié)果ent以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal()

{inti,j,thouwhun,ten,data,ab,cd;

for(i=0;i<200;i++)

{thou=a[i|/1000;hun=a[i]%1000/100;

ten=a[i]%100/10;data=a[i]%10;

ab=10*thou+ten;cd=10*data+hun;

if((ab-cd)>=0&&(ab-cd)<=10&&ah%2==l&&cd%2==l&&ab>=10&&cd>=10)

b[cnt++]=a[i];

)

for(i=0;i<cnt-l;i++)

for(j=i+l;j<cnt;j++)

if(b[i]<b[j]){thou=b[i]；b[i]=b[j];b[j]=thou;}

}

*************************************************************************

☆題目29(整數(shù)各位打散組合運算題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDat。把這些數(shù)存入數(shù)組a中，請考生編制?函數(shù)jsValO,其功能

是：把千位數(shù)字和十位數(shù)字重新組成一個新的十位數(shù)ab(新卜位數(shù)的卜位數(shù)字是原四位數(shù)的千位數(shù)字，新I?位數(shù)的個位數(shù)字是原

四位數(shù)的卜位數(shù)字)，以及把個位數(shù)字和百位數(shù)字組成另一個新的十位數(shù)cd(新卜位數(shù)的H立數(shù)字是原四位數(shù)的個位數(shù)字，新卜位

數(shù)的個位數(shù)字是原四位數(shù)的百位數(shù)字)，如果新組成的兩個十位數(shù)ab-cd>=10且ab-cd<=20且兩個數(shù)均是偶數(shù)，同時兩個新數(shù)的十

位數(shù)字均不為零，則將滿足此條件的四位數(shù)按從大到小的順序存入數(shù)組b中，并要計算滿足I:述條件的四位數(shù)的個數(shù)ent。

voidjsVal()

{inti,j,qw,bw,sw,g\v\ab,cd;

for(i=0;i<MAX;i++)

{qw=a[i]/1000;bw=a[i]/100%10;

sw=a[i]%100/10;gw=a[i]%10;

ab=qw*10+sw;cd=gw*10+bw;

if(ab-cd>=10&&ab-cd<=20&&ab%2==0&&cd%2==0&&qw!=0&&gw!=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]=bU];b[j]=qw;}

L

☆題目30(整數(shù)統(tǒng)計排序題)

已知數(shù)據(jù)文件IN.DAT中存有200個四位數(shù)，并已調(diào)用讀函數(shù)readDat。把這些數(shù)存入數(shù)組a中，請考生編制一函數(shù)jsVal。，其功能

是：依次從數(shù)組a中取出個四位數(shù)，如果該四位數(shù)連續(xù)小于該四位數(shù)以后的五個數(shù)且該數(shù)是偶數(shù)(該四位數(shù)以后不滿五個數(shù)，則

不統(tǒng)計)，則統(tǒng)計出滿足此條件的個數(shù)ent并把這些四位數(shù)按從小到大的順序存入數(shù)組b中，最后調(diào)用寫函數(shù)writeDat()把結(jié)果ent

以及數(shù)組b中符合條件的四位數(shù)輸出到OUT.DAT文件中。

voidjsVal()

{inti,j,flag;

for(i=0;i<MAX-5;i++)

{for(j=i+l;j<=i+5;j++)

if(a[i]<aLj]&&a[i]%2==0)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[il>b[j]){flag=b[i];b[i]=b[j];b[j]=flag;}

L*

★☆題目31(結(jié)構(gòu)體運算題)

已知在文件IN.DAT中存有100個產(chǎn)品銷售記錄，每個產(chǎn)品銷售記錄由產(chǎn)品代碼dm(字符型4位)，產(chǎn)品名稱me(字符型10位)，單

價dj(整型)，數(shù)量si(整型)，金額je(長整型)五部分組成。其中：金額=單價*數(shù)量計算得出。函數(shù)ReadDat()是讀取這100個銷售記

錄并存入結(jié)構(gòu)數(shù)組sell中。請編制函數(shù)SortDatO,其功能要求：按金額從大到小進行排列，若金額相同，則按產(chǎn)品代碼從大到小

進行排列，最終排列結(jié)果仍存入結(jié)構(gòu)數(shù)組sell中，最后調(diào)用函數(shù)WriteDat()把結(jié)果輸出到文件OUT4.DAT中。

voidSortDatO

{inti,j;

PROxy;

for(i=0;i<99;i++)

for(j=i+l;j<100;j++)if(sell[i].je<sell[j].jellsell[i].je==sell[j].je&&strcmp(sell[i].dm^elI[j].dni)<O)

{xy=seli[i];sell[i]=sell[j];sell[j]=xy;}

!********：**************”**********************“*********************

☆題Fl32(結(jié)構(gòu)體運算題)

已知在文件IN.DAT中存有100個產(chǎn)品銷售記錄，每個產(chǎn)品銷售記錄由產(chǎn)品代碼dm(字符型4位)，產(chǎn)品名稱me(字符型10位)，單

價dj(整型)，數(shù)量sl(整型)，金額je(長整型)五部分組成。其中：金額=單價*數(shù)量計算得出。函數(shù)ReadDat。是讀取這100個銷售記

錄并存入結(jié)構(gòu)數(shù)組sell中。請編制函數(shù)SortDatO,其功能要求：按產(chǎn)品名稱從大到小進行排列，若產(chǎn)品名稱相等，則按金額從小

到大進行排列，最終排列結(jié)果仍存入結(jié)構(gòu)數(shù)組sell中

,最后調(diào)用函數(shù)WriteDat。把結(jié)果輸出到文件OUT7.DAT中。

voidSortDatO

{inti,j;

PROxy;

for(i=0;i<99;i++)

for(j=i+l;j<100;j++)if(strcmp(sell[i].mc^selI[j].mc)<Ollstrcmp(seII[i].mc,sell[j].mc)==O&&seIl[i].je>selI[j].je)

{xv=sell[i];sell[i]=sell[j];sell[j]=xv；)

)

****************************************************************************

★☆題目33(方差運算題)

請編制函數(shù)ReadDat()實現(xiàn)從文件IN.DAT中讀取1000個十進制整數(shù)到數(shù)組xx中；請編制函數(shù)Compute。分別計算出xx中偶數(shù)的

個數(shù)even,奇數(shù)的平均值avel,偶數(shù)的平均值ave2以及方差totfc的值，最后調(diào)用函數(shù)WriteDatO把結(jié)果輸出到OUT.DAT文件中。

計算方差的公式如下.：

N2

totfc=l/N￡(xx[i]-ave2)

i=l

設(shè)N為偶數(shù)的個數(shù)，xx[i]為偶數(shù)，ave2為偶數(shù)的平均值。

原始數(shù)據(jù)文件存放的格式是：每行存放10個數(shù)，并用逗號隔開。(每個數(shù)均大于0且小于等于2000)

/*********編制函數(shù)ReadDat()的部分************/

for(i=0;i<MAX;i++)

{fscanf(fp,"%d,M,&xx[i]);

if((i+l)%10==0)

fscanf(fp,"\n'');}

voidCompute(void)

{inti,yy[MAX];

for(i=0;i<MAX;i++)

yy[i]=o；

for(i=0;i<MAX;i++)

if(xx[i]%2==0){yy[even++]=xx[i];ave2+=xx[i];}

else{odd++;avel+=xx[i];}

if(odd==0)avel=O;

elseavel/=odd;

if(even==O)ave2=0;

elseave2/=even;

for(i=0;i<even;i++)

totfc+=(yy[i]-ave2)*(yy[i]-ave2)/even;

工***仙****木*********仙共******共***林**行**林******林***木木**秘**仙木*

題目34(素數(shù)題)

無憂id102題提供了求素數(shù)isPrime。函數(shù)

程序progl.c的功能是：選出100以上1000之內(nèi)所有個位數(shù)字與十位數(shù)字之和被10除所得余數(shù)恰是百位數(shù)字的素數(shù)(如293)。計

算并輸出上述這些素數(shù)的個數(shù)ent以及這些素數(shù)值的和sum.請考生編寫函數(shù)countValue()實現(xiàn)程序要求，最后調(diào)用函數(shù)writeDAT。

把結(jié)果ent和sum輸出到文件bclO.out中。

intisPrime(intm)

(

inti;

for(i=2;i<m;i++)

if(m%i==0)return0;

return1;

)

voidcountValue()

{inti,j,bw,sw,gw;

for(i=100;i<1000;i++)

{bw=i/100;sw=i%100/10;gw=i%10;

if(isPrime(i)&&(gw+sw)%10==bw){cnt++;sum+=i;}

***************************************************************************

★☆題目35(級數(shù)運算題)

某級數(shù)的前兩項Al=l,A2=l,以后各項具與如下關(guān)系：

An=An-2+2An-l(注：n-2與n-1為下標)

下列程序progl.c的功能是：要求依次對于整數(shù)M=100,1000和10000求出對應(yīng)的n值，使其滿足：SnvM且Sn+1>=M,這里

Sn=Al+A2+...+An,并依次把n值存入數(shù)組單元b[0],b[l]和b[2]中，請編制jsVakie。函數(shù)來實現(xiàn)此功能，最后調(diào)用函數(shù)writeDat()

把數(shù)組b[]中的值輸出到out.dat文件中。

請勿改動主:函數(shù)main。和寫函數(shù)writeDat。的內(nèi)容。

#include<stdio.h>

intb[3];

jsValue()

{intal=l,a2=l,al2,sn,k=2;

sn=al+a2;

while(l)

{al2=al+2*a2;

if(sn<100&&sn+al2>=100)b[O]=k;

if(sn<1000&&sn+al2>=1000)b[l]=k;

if(sn<10000&&sn+al2>=10000){b[2]=k;break;)

sn=sn+al2;

al=a2;a2=al2;

k++;

運行結(jié)果為：

M=100,n=6

M=1000,n=9

M=10000,n=ll

★題目36(字符替換題)

函數(shù)ReadDat()實現(xiàn)從文件ENGIN中讀取一篇英文文章，存入到字符串?dāng)?shù)組xx中；請編制函數(shù)encryptChaK),按給定的替代關(guān)系

對數(shù)組xx中的所有字符進行替代，仍存入數(shù)組xx的對應(yīng)的位置上，最后調(diào)用函數(shù)WrileDat。把結(jié)果xx輸出到文件pS6.DAT中。

替代關(guān)系：f(p)=p*llmod256(p是數(shù)組中某一個字符的ASCH值，f(p)是計算后新字符的ASCII值)，如果計算后f(p)值小于

等于32或f(p)對應(yīng)的字符是數(shù)字0至9,則該字符不變，否則將f(p)所對應(yīng)的字符進行替代。

voidencryptChar()

{intiJ;

for(i=0;i<maxline;i++)

for(j=0;j<strlen(xx[i]);j++)

if(xx[