计算机三级网络技术上机题库《南开100题》

，题目1：下列程序的功能是：将大于整数m且紧靠m的k个素数存入数组xx。请编写函

数num(intm,intk,intxx口)实现函数的要求，最后调用函数readwriteDAT。把结果输出到文

件out.dat中。

例如：若输入17,5,则应输出：19,23,29,31,37。

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

请勿改动主函数main。和函数readwriteDAT。的内容。

类型：素数。

voidnum(intm,intk,intxx[])

{intdata=m+1;

inthalf,n=0,I;

while(l)

{half^data/2;fbr(I=2；I<=half;I++)

ifl[data%I=O)break;

if(I>half)

{xx[n]=data;n++;}

if(n>=k)break;

data++；

}}

题目2：已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat。把这些数存入

数组a中，请考生编制一函数jsVal(),其功能是：如果四位数各位上的数字均是0或2或4或6或

8,则统计出满足此条件的个数ent,并把这些四位数按从大到小的顺序存入数组.b中。最后

main。函数调用写函数writeDat()把结果ent以及数组b中符合条件的四位数输出到

OUT.DAT文件中。

注意：部分源程序存在文件PROG1.C文件中。

程序中已定义数组:a[200],b[200],已定义变量:ent

请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat。和写函数

writeDat()的内容。

voidjsVal()

{intbb[4];

intI,j,k,flag;

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

{bb[0]=a[I]/1000;bb[l]=a[I]%l000/100;

bb[2]=a[I]%100/10;bb[3]=a[I]%10;

for(j=0;j<4;j++)

{if(bb[j]%2=0)

flag=l;

else

{flag=O;break;}

)

if(flag=l)

{b[cnt]=a[I];

cnt++;}}

fbr(I=O;I<cnt-l

fbr(j=I+l;j<cnt;j++)

if(b[I]<b[j])

{k=b[I];b[I]=bU];bU]=k;}

)

题目3：函数READDAT()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组

XX中;请编制函数STROR(),其函数功能是:以行为单位把字符串中的所有小写字母O左边的

字符串内容移到该串的右边存放然后并把小写字母0删除，余下的字符串内容移到已处理字

符串的左边存放.最后把已处理的字符串仍按行重新存入字符串数组XX中,最后调用函数

WRITEDAT()把结果XX输出到文件OUT.DAT中.

例如:原文:Youcancreateanindexonanyfield.

youhavethecorrectrecord.

结果：nanyfield.Youcancreateanindex

rd.yuhavethecrrectrec

原始数据文件存放的格式是:每行的宽度均小于80个字符，含标点符号和空格.

类型：字符串(单词)的倒置和删除。

答案：

voidStrOR(void)

{intI,j,k,index,strl;

charch;

for(I=0;I<max1ine;I++)

{strl=strlen(xx[I]);

index=strl;

for(j=OJ<strl;j++)

if(xx[I][j]==,o,)

{for(k=j;k<strl-l火++)

xx[I][k]=xx[I][k+l];

xx[I][strLl]=r；

index寸}

fbr(j=strl-l;j>=index;j-)

{ch=xx[I][strl-l];

fbr(k=strl-1;k>0;k—)

xx[I][k]=xx[I][k-l];

xx[I][0]=ch;}

题目4：函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中；请

编制函数StrOL(),其函数的功能是：以行为单位对行中以空格或标点符号为分隔的所有单

词进行倒排，同时去

除标点符号，之后把已处理的字符串(应不含标点符号)仍按行重新存入字符串数组xx中。

最后main。函数调用函数WriteDat。把结果xx输出到文件OUT6.DAT中。

例如：原文:YouHeMe

Iamastudent.

结果:MeHeYou

studentaamI

原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。

类型：字符串(单词)的倒置和删除。

答案：

voidStrOL(void)

{intIj,k,strl,l;charc;

fbr(I=O;I<maxline;I-H-)

fbr(j=O;j<strlen(xx[I]);j-H-)

{c=xx[I][j];

if((c>=,A,&&c<=,Z,)||(c>=,a'&&c<='z,)||c==,*);

elsexx[I][j]-*；}

fbr(l=0;l<inaxline;14-+)

{charch[80]={0};charpp[80]={0};

strl=strlen(xx[l]);

I=strl-1;k=l;

while(1)

{while(((xx[l][I]>='a,&&xx[l][I]<=,z,)||(xx[l][I]>=,A,&&xx[l][I]<=lz,))&&I>=0)

{for(j=k;j>=O;j-)

pp[j+l]=pp[j]；pp[0]=xx[l][I];k++;I・・；}

strcat(ch,pp);strcpy(pp,MMnn);k=l;

if(I==-l)break;

while((xx[l][I]<'A,||xx[l][I]>,z')&&I>=0)

{for(j=k;j>=O;j-)

pp[j+l]=PPU]；pp[0]=xx[l][I];k++;I-;)

strcat(ch,pp);strcpy(ppj"””)；

k=0;

if(I==-l)break;}

strcpy(xx[l],ch);

}}

题H5：在文件in.dat中有200个正整数，且每个数均在1000至9999之间。函数ReadDat()读

取这200个数存放到数组aa中。请编制函数jsSort(),其函数的功能是：要求按每个数的后

三位的大小进行升序排列，然后取出满足此条件的前10个数依次存入数组b中，如果后三位

的数值相等，则按原先的数值进行降序排列。最后调用函数WriteDat()把结果bb输出到文

件out.dat中。

例：处理前60125099901270258088

处理后90126012702580885099

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

请勿改动主函数main()、读数据函数ReadDat。和输出数据函数WriteDat。的内容。

voidjsSort()

{intI,j,data;

fbr(I=0;I<199;I++)

fbr(j=I+l;j<200;j-H-)

{if(aa[I]%1000>aa[j]%1000)

{data=aa[I];aa[I]=aa[j];aa[j]=data;}

elseif(aa[I]%1000==aa[j]%1000)

if(aa[I]<aa[j])

{data=aa[I];aa[I]=aa[j];aa[j]=data;}

)

fbr(I=O;I<1

bb[I]=aa[I];

|

题目6：在文件in.dat中有200个正整数，且每个数均在1000至9999之间。函数ReadDat()读

取这200个数存放到数组aa中。请编制函数jsSort(),其函数的功能是：要求按每个数的后

三位的大小进行降序排列，然后取出满足此条件的前10个数依次存入数组b中，如果后三位

的数值相等，则按原先的数值进行升序排列。最后调用函数WriteDat()把结果bb输出到文

件out.dat中。

例：处理前90125099601270258088

处理后50998088702560129012

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

请勿改动主函数main。、读数据函数ReadDat()和输出数据函数WriteDat。的内容。

voidjsSort()

{intI,j,data;

fbr(I=0;I<199;I++)

fbr(j==I+l;j<200;j++)

{if(aa[I]%1000<aa[j]%1000)

{data=aa[I];aa[I]=aa[j];aa[j]=data;}

elseif(aa[I]%1OOO=aa[j]%1000)

if(aa[I]>aa[j])

{data=aa[I];aa[I]=aa[j];aa[j]=data;}

)

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

bb[I]=aa[I];

)

题目7：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字

符型4位)，产品名称me(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分

组成。其中：金额=单价*数量计算得出•函数ReadDat()是读取这100个销售记录并存入结构

数组sell中。请编制函数SortDat(),其功能要求：按产品代码从大到小进行排列，若产品代

码相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数

WriteDat()把结果输出到文件OUT10.DAT中。

注意：部分源程序存放在PROG1.C中。

请勿改动主函数main()>读数据函数ReadDat。和输出数据函数WriteDat。的内容。

voidSortDat()

{intI,j;

PROxy;

fbr(I=0;lv99;I")

fbr(j=I+l；j<100;j-H-)

if(strcmp(sell[I].dm,sell[j].dm)<0)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

elseif(strcmp(sell[I].dm,sell[j].dm)==O)

if(sell[I].je<sellU].je)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

)

题目8：函数ReadDat。实现从文件ENGIN中读取一篇英文文章，存入到字符串数组xx中；

请编制函数encryptChar(),按给定的替代关系对数组xx中的所有字符进行替代，仍存入数

组xx的对应的位置上，最后调用函数WriteDat。把结果xx输出到文件PS1.DAT中。

替代关系：f(p)=p*llmod256(p是数组中某一个字符的ASCH值，f(p)是计算后新字符

的ASCII值)，如果计算后f(p)值小于等于32或大于130,则该字符不变，否则将f(p)所对应

的字符进行替代。

注意：部分源程序已给出。原始数据文件存放的格式是：每行的宽度均小于80个字符。

请勿改动主函数main()>读数据函数RcadDat()和输出数据函数WriteDat()的内容。

voidencryptChar()

{intI;

char*pf;

for(I=0;lvmaxline;I++)

{pf=xx[I];

while(*pf!=0)

ll%256>130||*pf*11%256<=32);

else

*pf==*pf*l1%256;

pf++;}

}

题目9：函数ReadDatQ实现从文件IN.DAT中读取•篇英文文章存入到字符串数组xx中；请

编制函数SortCharD(),其函数的功能是：以行为单位对字符按从大到小的顺序进行排序,

排序后的结果仍按行重新存入字符串数组xx中。最后main()函数调用函数WriteDat()把结果

xx输出到文件OUT2.DAT中。

例：原文：dAe,BfC.

CCbbAA

结果：fedCBA.,

bbCCAA

原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。

注意：部分源程序存放在PROG1.C中。

请勿改动主函数main()、读数据函数ReadDat。和输出数据函数WriteDat()的内容。

类型：字符串(单词)的倒置和删除。

答案：

voidSortCharD(void)

{intI,j,k,strl;

charch;

fbr(I=O;I<maxline;I++)

{strl=strlen(xx[I]);

fbr(j=Oj<strl-l;j++)

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

if(XX[I][j]<XX[I][k])

{ch=xx[I][j]；xx[I][j]=xx[I][k];xx[I][k]=ch;}

}}

题目10：请编制函数ConvertCharA(),其函数的功能是：以行为单位把字符串中的所有小写

字母改写成该字母的下一个字母，如果是字母z,则改写成字母a,大写字母和其它字符保持

不变。把己处理的字符串仍按行重新存入字符串数组xx中。。最后main()函数调用函数

WriteDat()把结果xx输出到文件OUT3.DAT中。

例：原文:Adb.Bcdza

abck.LLhj

结果:Aec.Bdeab

bcdl.LLik

原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。

注意：部分源程序存放在PROG1.C中。

请勿改动主函数main()、读数据函数ReadDat。和输出数据函数WriteDat()的内容。

类型：字符串(单词)的倒置和删除。

答案：

voidConvertCharA(void)

{intI,j,str;

fbr(I=O;I<maxline;I-H-)

{str=strlen(xx[I]);

fbr(j=Oy<str;j++)

if(xx[I][j]=='z')xx[I]U]='a';

elseif(xx[I][j]>='a'&&xx[I][j]<=y)xx[I][j]+=l；

)

)

题目11：下列程序的功能是：把s字符串中的所有字母改写成该字母的下一个字符，字母z

改写成字母a。要求大写字母仍为大写字母，小写字母仍为小写字母，其他字符不做改变。

请编写函数chg(char*s)实现程序的要求，最后调用函数readwriteDat()把结果输出到文件

out.dat中o

例如：s字符串中原有的内容为：Mn.l23Zxy,则调用该函数后，结果为No.l23Ayz。

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

请勿改动主函数main。和输出数据函数readwriteDat()的内容。

voidchg(char*s)

{while(*s)

if(*s==,z,||*s=,Z,)

{*s-=25;s-H-;)

elseif(*s>=,a,&&*s<=,y,)

elseiflf*s>=,A,&&*s<=,Y,)

{*s+=];s++;}

elses++；

}

题目12：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码

dm(字符型4位)，产品名称me(字符型10位)，单价dj(整型)，数量si(整型)，金额je(长整型)

四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存

入结构数组sell中。请编制函数SortDat(),其功能要求：按产品名称从小到大进行排列，若

产品名称相同，则按金额从小到大进行排列.最终排列结果仍存入结构数组sell中，最后调用

函数WriteDat()把结果输出到文件OUT5.DAT中。

注意：部分源程序存放在PROGLC中。

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。

voidSortDat()

{intI,j;

PROxy;

fbr(I=0;I<99;I++)

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

if(strcnip(sell[I].dm,sell[j].dm)<0)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

elseif(strcmp(sel1[I].dm,sell[j].dm)==0)

if(sell[I].je<sell[j].je)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

题目13：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码

dm(字符型4位)，产品名称me(字符型10位)，单价dj(整型)，数量si(整型)，金额je(长整型)

四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存

入结构数组sell中。请编制函数SortDat(),其功能要求：按产品代码从小到大进行排列，若

产品代码相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调

用函数WriteDat()把结果输出到文件OUT6.DAT中。

注意：部分源程序存放在PROG1.C中。

请勿改动主函数main()＞读数据函数ReadDat。和输出数据函数WriteDat。的内容。

voidSortDat()

{intI,j;

PROxy;

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

fbr(j=I+l;j<100;j++)

if(strcmp(sell[I].mc,sell[j].mc)>O)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

elseif(strcmp(sell[I].mc,sell[j].mc)==0)

if(sell[I].je<sellU].je)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

题目14：已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存

入数组a中，请考生编制一函数jsVal(),其功能是：依次从数组a中取出一个四位数，如果该

数连续大于该四位数以后的5个数且该数是奇数，则统计出满足此条件的个数ent,并把这

些四位数按从小到大的顺序存入数组b中。并要计算满足上述条件的四位数的个数ento

最后main。函数调用写函数writeDat()把结果ent以及数组b中符合条件的四位数输出到

OUT.DAT文件中。

注意：部分源程序存在文件PROG1.C文件中。

程序中已定义数组:a[200],b[200],已定义变量:ent

请勿改动数据文件IN.DAT中的任何数据、主函数main。、读函数readDat。和写函数

writeDat()的内容。

voidjsVal()

{intIj,flag=0;

intk;

fbr(I=0;I<MAX-5;I++)

{fbr(j=I+l;jv=I+5;j++)

{if(a[I]>aU])

flag=l;

else{flag=O;break;}

if(a[I]%2==0)

flag=O;}

if(flag=l)

{b[cnt]=a[I];cnt++;}

fbr(I=O;I<cnt-l

fbr(j=I+l;j<cnt;j-H-)

if(b[I]>bU])

{k=b[I];b[I]=b[j];b[j]=k;}

题目15：已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存

入数组a中，请考生编制一函数jsVal(),其功能是:若一个四位数的千位数字上的值小于等于百

位数字上的值，百位数字上的值小于等于十位数字上的值，十位数字上的值小于等于个位数

字上的值，并且此四位数是偶数，则统计出满足此条件的个数ent,并把这些四位数按从大

到小的顺序存入数组b中。最后main。函数调用写函数writeDat()把结果ent以及数组b中

符合条件的四位数输出到OUT.DAT文件中。

注意：部分源程序存在文件PROG1.C文件中。

程序中已定义数组:a[200],b[200],已定义变量:ent

请勿改动主函数main()^读函数readDat。和写函数writeDat。的内容。

voidjsVal()

{intI,j;

intal,a2,a3,a4,k;

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

{al=a[I]/1000;a2=a[I]%1000/100;

a3=a[I]%100/10;a4=a[I]%10;

if((aK=a2)&&(a2<=a3)&&(a3<=a4)&&(a[I]%2==0))

{b[cnt]=a[I];

cnt++;}

}

fbr(I=O;I<cnt-1;I++)

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

if(b[1]>bU])

{k=b[I];b[I]=bU];bU]=k;}

}

数ReadDatO实现从文件IN.DAT中读取•篇英文文章存入到字符串数组XX中，请编制函数

StrCharJR(),其函数的功能是：以行为单位把字符串中所有字符的ASCII值右移4位，然后

把右移后的字符ASCII值再加上原字符的ASCII值，得到新的字符仍存入原字符串对应的

位置上。最后把已处理的字符串仍按行重新存入字符串数组xx中，最后调用函数writeDat。

把结果xx输出到文件OUT8.DAT中。原始数据文件存放的格式是：每行的宽度均小于80个

字符，含标点符号和空格。

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

请勿改动主函数main。、读数据函数RcadDat()和输出数据函数writeDat。的内容。

voidStrCharJR(void)

{intI,j,strl;

fbr(I=0;l<maxline;I++)

{strl=strlen(xx[I]);

for(j=Oj<strlJ++)

xx[I]U]+=xx[I]U]»4;

)

}

注：这个编程题比二级考得还简单。

voidStrCharJR(void)

{intij;

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

fbr(j=O;xx[i][j]!=,\O,;j++)

xx[i][j]+=xx[i][j]»4;

}

题目17：函数READDAT()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组

XX中;请编制函数CHA(),其函数功能是:以行为单位把字符串中的第个字符的ASCII值加

第二个字符的ASCII值，得到第一个亲朋字符,第二个字符的ASCH值加第三个字符的ASCII

值，得到第二个新字符，依此类推一直处理到最后第二个字符，最后•个字符的ASCII值

加原第一个字符的ASCII值，得到最后一个新的字符，得到的新字符分别存放在原字符串

对应的位置上。最后把已处理的字符串逆转后按行重新存入字符串数组XX中，最后调用函

数WRITEDAT()把结果XX输出到文件0UT9.DAT中.原始数据文件存放的格式是:每行的宽

度均小于80个字符，含标点符号和空格.

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

请勿改动主函数main。、读数据函数ReadDat。和输出数据函数writeDat。的内容。

voidChA(void)

{intI,j,k,str;

charch;

fbr(I=O;I<maxline;I-H-)

{str=strlen(xx[I]);

ch=xx[I][0];

for(j=O;j<str-l;j++)

xx[I][j]+=xx[I][j+l];

xx[I][str-l]+=ch;

for(j=0,k=str-l;j<str/2;j++,k—)

{ch=xx[I][j];

xx[I][j]=xx[I][k];

xx[I][k]=ch;}

)

题目18：函数ReadDat。实现从文件ENGIN中读取一篇英文文章，存入到字符串数组xx中；

请编制函数encryptChar(),按给定的替代关系对数组xx中的所有字符进行替代，仍存入数

组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS10.DAT中。

替代关系：f(p)=p*11mod256(p是数组中某一个字符的ASCH值，f(p)是计算后新字符

的ASCH值)，如果原字符的ASCII值是偶数或计算后f(p)值小于等于32,则该字符不变，

否则将f(p)所对应的字符进行替代。

注意：部分源程序已给出。原始数据文件存放的格式是：每行的宽度均小于80个字符。

请勿改动主函数main。、读数据函数ReadDat()和输出数据函数WriteDat()的内容。

voidencryptChar()

{intI；

char*pf;

fbr(I=O;I<maxline;I++)

{pf=xx[l];

whiIe(*pf!=O)

{ifi(*pf%2=0||*pP|£l1%256<=32)

else

*pf=*pf*l1%256;

}}

题目19：编写一个函数findstrO,该函数统计一个长度为2的子字符串在另一个字符串中出现

的次数。例如：假定输入的字符串为"asdasasdfgasdaszx67asdmklo",子字符串为"as",函数

返回值为6。

函数readwriteDat。的功能是实现从文件in.dat中读取两个字符穿4,并调用函数findstr。，

最后把结果输出到文件out.dat中。

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

请勿改动主函数main。和函数ReadWrite。的内容。

intfindStr(char*str,char*substr)

{intn;

char*p,*r;

n=0;

while(*str)

{P=str;

r=substr;

while(*r)

if(*r=*p){r-H-;p++;}

elsebreak;

if(*r=、0')

n++;

str++；}

returnn;

题目20：编写函数jsvalue,它的功能是：求Fibonacci数列中大于t的最小的一个数，结果

山函数返回。其中Fibonacci数列F(n)的定义为：

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

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

最后调用函数writcDat()读取10个数据3分别得出结果且把结果输出到文件out.dat中。

例如:当41000时，函数值为：1597。

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

请勿改动主函数main。和写函数writeDat。的内容。

intjsValue(intt)

{intfl=0,f2=l,fh;

fh=n+f2;

while(fh<=t)

f2=fh;

fh=fl+f2;}

returnfh;

题目21：下列程序的功能是：利用发下所示的简单迭代方法求方程：cos(x)・x=0的一个实根。

xn+l=cos(xn)

迭代步骤如下：

(I)取XI初值为0.0；

(2)XOX1,把XI的值赋给X0；

(3)X1=COS(X0),求出一个新的XI；

(4)若X0-X1绝对值小0.000001,执行步骤(5),否则执行步骤(2);

(5)所求XI就是方程cos(X)-X=0的一个实根，作为函数值返回。

请编写函数countvalue()实现程序的要求，最后调用函数WRITEDAT()把结果输出到文

件OUT17.DAT中。

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

请勿改动主函数main()和输出数据函数writeDAT()的内容。

floatcountValue()

{floatx0,xl=0.0;

while(l)

{x0=xl;

xl=cos(x0);

if(fabs(xO-x1)<1e-6)break;

)

returnxl;

题目22：请编写函数countvalue。，它的功能是：求n以内(不包括n)同时能被3和7整数

的所有自然数之和的平方根s,并作为函数值返回，最后结果s输出到文件out.dat中。

例如若n为1000时，函数值应为:s=153.909064,

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

请勿改动主函数main()和输入输出数据函数progreadwrite。的内容。

doublecountValue(intn)

{doublexy=0.0;

intI;

fbr(I=l;I<n;I++)

if(I%3==0&&I%7=0)xy+=I;

xy=sqrt((double)xy);

returnxy;

}

doublecountvalue(intn)

{inti,j=0;

doublek;

fbr(i=0;i<n;i++)

iWi%3==0&&i%7==0)

j+=i；

k=sqrt(j)；

returnk;}

题目23:已知在文件in.dat中存有N个(个数<200)四位数字的正整数，函数readdat()读取

这N个正整数并存入数组xx中。请编制函数calvahie。，其功能要求：1、求出这N个实数

的平均值aver；2、分别求出这N个实数的整数部分之和sumint以及小数部分之和sumdec,

最后调用函数writcdat()把所求的结果输出到文件out.dat中。

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

请勿改动主函数main()>读数据函数readdat()和输出数据函数writedat()的内容。

voidCalValue(void)

{intI;

doublex,sum=0;

for(I=0;KMAXNUM;R+)

{sumint=sumint-l-(int)xx[I];

x=xx[I]-(int)xx[I];

sumdec=sumdec+x;

sum=sum+xx[I];

)

aver=sum/MAXNUM;

)

题H24：在三位整数(100至999)中寻找符合条件的整数并依次从小到大存入数组中；它既是

完全平方数，又是两位数字相同，例如144、676等。请编制函数实现此功能，满足该条件的

整数的个数通过所编制的函数返回。最后调用函数writeDat()把结果输出到文件out.dat中。

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

请勿改动主函数main。和写函数writeDat。的内容。

jsValue(inta[10][9])

{intLj,k=O;

inthun,ten,data;

for(I=100;I<=999;I-H-)

{j=10;

while(j*j<=I)

{if(I==j*j)

{hun=I/1OO;data=I-hun*100;

ten=data/l0;data=data-ten*10;

ifl(hun==ten||hun=data11tcn=data)

{bb[k]=I;k++;}

}

j++;}}

returnk;

)

题目25：下列程序的功能是：寻找并输出11至999之间的数m,它满足m,m2和m3均为回文

数。所谓回文数是指其各位数字左右对称的整数，例如121,676,94249等。满足上述条件

的数如m=lI,m2=121,m3=1331皆为回文数。请编制函数intsvalue(longm)实现此功能，如果

是回文数，则函数返回1,反之则返回0。最后把结果输出到文件out.dat中。

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

请勿改动主函数main。的内容。

intjsValue(longn)

{intI,strl,half;

charxy[20];

ltoa(n,xy,10);

strl=strlen(xy);

half=strl/2;

for(I=0;I<half;I-H-)

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

if(I>=half)return1;

elsereturn0;

)

题目26:已知在文件in.dat中存有若干个(个数v200)四位数字的正整数，函数readdat()读取

这若干个正整数并存入数组XX中。请编制函数calvalue(),其功能要求：1、求出这文件中

共有多少个正整数totnum；2、求这些数右移1位后，产生的新数是偶数的数的个数totcnt,

以及满足此条件的这些数(右移前的值)的算术平均值totpjz,最后调用函数writedat()把所

求的结果输出到文件out.dat中。

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

请勿改动主函数main。、读数据函数readdat()和输出数据函数writedat。的内容。

voidCalValue(void)

{intI,data;

for(I=0;I<MAXNUM;I++)

{if(!xx[I])break;

if(xx[I]>0)totNum-H-；

data=xx[I]»l;

if(data%2=0){totCnt-H-;totPjz+=xx[I];}

)

totPjz/=totCnt;

题H27：已知数据文件IN.DAT中存有300个四位数，并已调用读函数ReadDat。把这些数存

入数组a中，请编制一函数jsvalue(),其功能是：求出千位数上的数减百位数减卜位数上的

数减个位数上的数大于零的个数ent,再求出所有满足此条件的四位数平均值pjzl,以及不

满足此条件的四位数平均值pjz2,最后调用写函数writeDat()把结果输出到OUT.DAT文件。

例如：9123,9-1-2-3>0,则该数满足条件计算平均值pjzl,且个数cnt=cnt+l。

9812,9-8-1-2<0,则该数不满足条件计算平均值pjz2.

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

程序中已定义数组：a[300],已定义变量：ent

请勿改动主函数main。、读函数ReadDat。和写函数writeDat()的内容。

voidjsValue()

{intI,thou,hun,ten,data,j;

for(I=0;I<300;I-H-)

{thou=a[I]/l000;hun=a[I]%l000/100;

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

if(thou-hun-ten-data>0){b[cnt]=a[I];cnt++;)

)

fbr(I=O;I<cnt-1;I++)

fbr(j=I+l;j<cnt;j++)

ifi[b[I]>bU])

{data=b[I];b[I]=b[j];b[j]=data;}

)

题FI28：已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存

入数组a中，请考生编制一函数jsVal(),其功能是：把千位数字和十位数字重新组成一个新的

十位数ab(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的

十位数字)，以及把个位数字和百位数字组成另一个新的十位数cd(新十位数的十位数字是

原四位数的个位数字，新十位数的个位数字是原四位数的百位数字)，如果新组成的两个十位

数ab-cd>=0且ab-cd<=10且两个数均是奇数，同时两个新数的十位数字均不为零，则将满足此

条件的四位数按从大到小的顺序存入数组b中，并要计算满足上述条件的四位数的个数ent。

最后main()函数调用写函数writeDat()把结果ent以及数组b中符合条件的四位数输出到

OUT.DAT文件中。

注意：部分源程序存在文件PROG1.C文件中。

程序中已定义数组:a[200],b[200],已定义变量:ent

请勿改动数据文件IN.DAT中的任何数据、主函数main。、读函数readDat()和写函数

writeDat。的内容。

voidjsVal()

{intI,thou,hun,ten,data,j;

intab,cd;

fbr(I=0;K200;I-H-)

{thou=a[I]/1000;hun=a[I]%l000/100;

ten=a[I]%100/10;data=a[I]%l0;

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

if((ab-cd)>=0&&(ab-cd)<=l0&&ab%2=1&&cd%2==l&&ab!=0&&cd!=0)

{b[cnt]=a[I];cnt++;}

)

for(I=0;I<cnt-l

fbr(j=I+l;j<cntg++)

if(b[I]<bU])

{data=b[I];b[I]=b[j];b[j]=data;}

题目29：已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat。把这些数存

入数组a中，请考生编制一函数jsVal(),其功能是：把千位数字和十位数字重新组成一个新的

十位数ab(新十位数的十位数字是原四位数的下位数字,新十位数的个位数字是原四位数的

十位数字)，以及把个位数字和百位数字组成另一个新的十位数cd(新十位数的十位数字是

原四位数的个位数字，新十位数的个位数字是原四位数的百位数字)，如果新组成的两个十位

数ab・cd>=10且ab・cdv=20且两个数均是偶数,同时两个新数的十位数字均不为零，则将满足此

条件的四位数按从大到小的顺序存入数组b中，并要计算满足上述条件的四位数的个数

ento最后main()函数调用写函数writeDat()把结果ent以及数组b中符合条件的四位数输出

到OUT.DAT文件中。

注意：部分源程序存在文件PROG1.C文件中。

程序中已定义数组:a[200],b[200],已定义变量:ent

请勿改动数据文件IN.DAT中的任何数据、主函数main()>读函数readDat()和写函数

writeDat()的内容。

voidjsVal()

{intI,thou,hun,ten,data,j;

intab,cd;

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

{thou=a[I]/1000;hun=a[I]%l000/100;

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

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

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

{b[cnt]=a[I];cnt++;}

}

fbr(I=O;I<ciit-1;1++)

fbr(j=I+l;j<cnt;j++)

if(b[I]<b[j])

{data=b[I];b[I]=b[j];bfj]=data;}

题目30：已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat。把这些数存

入数组a中，请考生编制一函数jsVal(),其功能是：依次从数组a中取出一个四位数，如果该

数连续小于该四位数以后的5个数且该数是偶数，则统计出满足此条件的个数ent,并把这

些四位数按从小到大的顺序存入数组b中。并要计算满足上述条件的四位数的个数ent。

最后main。函数调用写函数writeDat()把结果ent以及数组b中符合条件的四位数输出到

OUT.DAT文件中。

注意：部分源程序存在文件PROG1.C文件中。

程序中已定义数组:a[200],b[200],已定义变量:ent

请勿改动数据文件IN.DAT中的任何数据、主函数main。、读函数readDat。和写函数

writeDat。的内容。

voidjsVal()

{intI,j,flag=O;

fbr(I=0;I<MAX-5;I++)

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

{if(a[I]<aU])

flag=l;

elseflag=0;

if(a[I]%2!=0)

flag=0;

if(flag=0)

break;}

if(flag==l){b[cnt]=a[I];cnt-H-;}

}

fbr(I=O;I<cnt-1;1++)

fbr(j=l+l;j<cnty++)

ifi[b[I]>bU])

{flag=b[l];b[I]=bU];bU]=flag;}

)

题目31：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码

dm(字符型4位)，产品名称me(字符型10位)，单价dj(整型)，数量si(整型)，金额je(长整型)

四部分组成。其中：金额=单价*数量计算得出。函数ReadDatO是读取这100个销售记录并存

入结构数组sell中。请编制函数SortDat(),其功能要求：按产品代码从大到小进行排列，若

产品代码相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调

用函数WriteDat。把结果输出到文件OUT6.DAT中。

注意：部分源程序存放在PROG1.C中。

请勿改动主函数main()、读数据函数ReadDat。和输出数据函数WriteDat()的内容。

voidSortDat()

{intI,j;

PROxy;

for(I=0；I<99;I++)

fbr(j=I+1;j<1

if(sell[I].je<sell[j].je)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

elseif(sell[I].je=sell[j].je)

if(strcmp(sell[I].dm,sell[j].dm)<O)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

题目32：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码

dm(字符型4位)，产品名称me(字符型10位)，单价dj(整型)，数量si(整型)，金额je(长整型)

四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存

入结构数组sell中。请编制函数SortDat(),其功能要求：按产品名称从大到小进行排列，若

产品名称相同，则按金额从小到大进行排列.最终排列结果仍存入结构数组sell中，最后调

用函数WriteDat。把结果输出到文件OUT7.DAT中。

注意：部分源程序存放在PROG1.C中。

请勿改动主函数main()>读数据函数ReadDat()和输出数据函数WriteDat()的内容。

voidSortDat()

{intI,j；

PROxy;

for(I=0;I<MAX-l;I++)

for(j=I+l；j<MAX;j++)

if(strcmp(sell[I].mc,sell[j].mc)<0)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

elseif(strcmp(sell[I].mc,sell[j].mc)==0)

if(sell[I].je>sell[j].je)

{xy=sell[I];sell[I]=sell[j];sell[j]=xy;}

题目33：请编制函数ReadDat()实现从文件IN.DAT中读取1000个十进制整数到数组xx中；

请编制函数Compute。分别计算出xx中奇数的个数odd,奇数的平均值avel,偶数的平均值

ave2以及所有奇数的方差totfc的值，最后调用函数WriteDat()把结果输出到OUT.DAT文件

中。计算方差的公式如下：totfb=l/NZ(xx[i]-avel)2

设N为奇数的个数，xx[i]为奇数，avel为奇数的平均值。

原始数据文件存放的格式是：每行存放10个数，并用逗号隔开。(每个数均大于0且小于

等于2000)

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

请勿改动主函数main。和输出数据函数writeDat。的内容。

voidCompute(void)

{intI,yy[MAX];

fbr(I=0;I<1000;I++)

if(xx[I]%2){odd-H-；avel+=xx[I];}

clse{even+4-；ave2+=xx[I];yy[even-l]=xx[I];}

avel/=odd;

ave2/=even;

fbr(I=O;I<even;H-+)

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

}

题目34：下列程序的功能是：选取出100以上1000以内所有个位数字与十位数字之和被10除

所得余数恰是百位数字的素数(如293)。计算并输出上述这些素数的个数CNT以及这些素

数值的和SUM。请编写函数COUNTvakie()实现程序要求，最后调用函数WRITEDAT()

把结果CNT和SUM输出到文件OUT.DAT中.

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

请勿改动主函数main()和函数readwriteDAT()的内容。

类型：素数。

voidcountValue()

{intI,j,half,hun,ten,data;

for(I=101；I<1000;I++)

{hun=I/100;

ten=I%100/10;

data=I%10;

if(hun=(ten+data)%10)

{half^I/2;

fbr(j=2;j<half;j++)

if(I%j=O)break;

if(j>=half)

{cnt++;sum+=I;}}}

}

题目35：某级数的前两项A1=1,A2=1,以后各项具有如卜关系：An=An-2+2An-l.

下列程序的功能是：要求依次对于整数M=100/000和10000求出对应的n值，使其满足：

Sn<M且Sn+1>=M,这里Sn=Al+A2+...+An,

并依次把n值存入数组单元b[O],b[l]和b[2]中，请编制jsvakie()函数来实现此功能，最后调

用函数writeDat()把数组b口中的值输出到out.dat文件中。

注意：部分源程序存在文件PROG1.C文件中。

请勿改动主函数main()和写函数writeDat()的内容。

voidjsvalue()

{intal=l,a2=1,n=l,an;

intsum0,sum;

sum0=al+a2;

while(l)

{an=al+a2*2;

sum=sum0+an;

al=a2;a2=an;n++;

if(sum0<100&&sum>100)b[0]=n;

if(sum0<1000&&sum>1000)b[l]=n；

if(sumO<l0000&&sum>10000){b[2]=n;break;}

sum0=sum;

题目36：函数ReadDat。实现从文件ENGIN中读取一篇英文文章，存入到字符串数组xx中：

请编制函数encryptCharO,按给定的替代关系对数组xx中的所有字符进行替代，仍存入数

组xx的对应的位置上，最后调用函数WriteDat。把结果xx输出到文件PS6.DAT中。

替代关系：f(p)=p*llmod256(p是数组中某一个字符的ASCH值，f(p)是计算后新字符

的ASCII值)，如果计算后f(p)值小于等于32或出p)对应的字符是数字0至9,则该字符不变，

否则将f(p)所对应的字符进行替代。

注意：部分源程序已给出。原始数据文件存放的格式是：每行的宽度均小于80个字符.

请勿改动主:函数main。、读数据函数RcadDat。和输出数据函数WriteDat。的内容。

voidencryptCharO

{inti;

char*p£

fbr(I=O;I<maxline;I++)

{pf^xx[I];

while(*pf!=0)

l%256>=,0,&&*pf*ll%256<=,9,)||*pf*l1%256<=32)

{pfi-+;continuc;}

*pf=*pf*l1%256;

pg;}}

}

题目37：函数ReadDat()实现从文件ENGIN中读取一篇英文文章，存入到字符串数组xx中；

请编制函数encryptCharO,按给定的替代关系对数组xx中的所有字符进行替代，仍存入数

组xx的对应的位置上，最后调用函数WriteDat()把