二级南开

来源：花图问答

题目1：下列程序的功能是：将大于整数m且紧靠m的k个素数存入数组xx。请编写函数num(int m,int k,int xx[])实现函数的要求，最后调用函数readwriteDAT()把结果输出到文件out.dat中。例如：若输入17，5，则应输出：19，23，29，31，37。注意：部分源程序已给出。

请勿改动主函数main()和函数readwriteDAT()的内容。 -------------- 类型：素数。

void num(int m,int k,int xx[]) /*标准答案*/ {int data=m+1; int half,n=0,I; while(1)

{half=data/2;for(I=2;I<=half;I++) if(data%I==0)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, 则统计出满足此条件的个数cnt, 并把这些四位数按从大到小的顺序存入数组b中。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/ {int bb[4]; int I,j,k,flag;

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

{bb[0]=a[I]/1000; bb[1]=a[I]%1000/100; bb[2]=a[I]%100/10; bb[3]=a[I]%10; for (j=0;j<4;j++) {if (bb[j]%2==0) flag=1; else

{flag=0;break;} }

if (flag==1) { b[cnt]=a[I]; cnt++;} } for(I=0;I{k=b[I];b[I]=b[j];b[j]=k;} }

题目3：函数READDAT（）实现从文件IN.DAT中读取一篇英文文章存入到字符串数组XX中;请编制函数STROR(),其函数功能是:以行为单位把字符串中的所有小写字母O左边的字符串内容移到该串的右边存放,然后并把小写字母O删除,余下的字符串内容移到已处理字符串的左边存放.最后把已处理的字符串仍按行重新存入字符串数组XX中,最后调用函数WRITEDAT()把结果XX输出到文件OUT.DAT中.

例如:原文:You can create an index on any field. you have the correct record.

结果: n any field.You can create an index rd.yu have the crrect rec

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

类型：字符串（单词）的倒置和删除。答案：

void StrOR(void) /*标准答案*/ { int i,righto,j,k; char tem[80];

for(i=0;i{k=0;righto=0;memset(tem,0,80); for(j=strlen(xx[i])-1;j>=0;j--)

{if(xx[i][j]=='o') {righto=j;break;} }

for(j=righto+1;j{if(xx[i][j]!='o') tem[k++]=xx[i][j];} strcpy(xx[i],tem); } }

题目4：函数ReadDat( )实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中; 请编制函数StrOL( ), 其函数的功能是: 以行为单位对行中以空格或标点符号为分隔的所有单词进行倒排，同时去除标点符号，之后把已处理的字符串(应不含标点符号)仍按行重新存入字符串数组xx中。最后main()函数调用函数WriteDat()把结果xx输出到文件OUT6.DAT中。例如: 原文: You He Me

I am a student. 结果: Me He You student a am I

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

类型：字符串（单词）的倒置和删除。答案：

void StrOL(void) /*标准答案*/ {int I,j,k,strl,l;char c; for(I=0;Ifor(j=0;jif ((c>='A'&&c<='Z')||(c>='a'&&c<='z')||c==' ') ; else xx[I][j]=' '; }

for(l=0;l{char ch[80]={0}; char pp[80]={0}; strl=strlen(xx[l]); I=strl-1; k=1; while(1)

{while (((xx[l][I]>='a'&&xx[l][I]<='z')||(xx[l][I]>='A'&&xx[l][I]<='z'))&&I>=0) {for(j=k;j>=0;j--)

pp[j+1]=pp[j]; pp[0]=xx[l][I]; k++;I--; } strcat(ch,pp);strcpy(pp, \"\"\"\");k=1; if(I==-1)break;

while((xx[l][I]<'A'||xx[l][I]>'z')&&I>=0) {for(j=k;j>=0;j--)

pp[j+1]=pp[j]; pp[0]=xx[l][I]; k++; I--;} strcat(ch,pp); strcpy(pp,\"\"\"\"); k=0;

if(I==-1)break;} strcpy(xx[l],ch); }}

题目5：在文件in.dat中有200个正整数，且每个数均在1000至9999之间。函数ReadDat()读取这200个数存放到数组aa中。请编制函数jsSort()，其函数的功能是：要求按每个数的后三位的大小进行升序排列，然后取出满足此条件的前10个数依次存入数组b中，如果后三位的数值相等，则按原先的数值进行降序排列。最后调用函数WriteDat()把结果bb输出到文件out.dat中。例：处理前 6012 5099 9012 7025 8088 处理后 9012 6012 7025 8088 5099 注意：部分源程序已给出。

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

void jsSort() /*标准答案*/ {int I,j,data;

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

for(j=I+1;j<200;j++)

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

{data=aa[I];aa[I]=aa[j];aa[j]=data;} else if(aa[I]%1000==aa[j]%1000) if(aa[I]{data=aa[I];aa[I]=aa[j];aa[j]=data;} }

for(I=0;I<10;I++) bb[I]=aa[I]; }

题目6：在文件in.dat中有200个正整数，且每个数均在1000至9999之间。函数ReadDat()读取这200个数存放到数组aa中。请编制函数jsSort()，其函数的功能是：要求按每个数的后三位的大小进行降序排列，然后取出满足此条件的前10个数依次存入数组b中，如果后三位的数值相等，则按原先的数值进行升序排列。最后调用函数WriteDat()把结果bb输出到文件out.dat中。例：处理前 9012 5099 6012 7025 8088 处理后 5099 8088 7025 6012 9012 注意：部分源程序已给出。

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

void jsSort() /*标准答案*/ {int I,j,data;

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

for(j=I+1;j<200;j++)

{if (aa[I]%1000{data=aa[I];aa[I]=aa[j];aa[j]=data;} else if(aa[I]%1000==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位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按产品代码从大到小进行排列，若产品代码相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT10.DAT中。

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

请勿改动主函数main( )、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------------- void SortDat() /*标准答案*/ {int I,j; PRO xy;

for(I=0;I<99;I++) for(j=I+1;j<100;j++)

if(strcmp(sell[I].dm,sell[j].dm)<0) {xy=sell[I];sell[I]=sell[j];sell[j]=xy;} else if(strcmp(sell[I].dm,sell[j].dm)==0) if(sell[I].je{xy=sell[I]; sell[I]=sell[j]; sell[j]=xy;} }

题目8：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS1.DAT中。替代关系：f(p)=p*11 mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果计算后f(p)值小于等于32或大于130，则该字符不变，否则将f(p)所对应的字符进行替代。

注意：部分源程序已给出。原始数据文件存放的格式是：每行的宽度均小于80个字符。请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ------------------------------ void encryptChar() /*标准答案*/

{int I; char *pf;

for(I=0;Iwhile(*pf!=0)

{if(*pf*11%256>130||*pf*11%256<=32); else

*pf=*pf*11%256; pf++; } } }

题目9：函数ReadDat( )实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中; 请编制函数SortCharD( ), 其函数的功能是: 以行为单位对字符按从大到小的顺序进行排序, 排序后的结果仍按行重新存入字符串数组xx中。最后main()函数调用函数WriteDat()把结果xx输出到文件OUT2.DAT中。

例: 原文: dAe,BfC. CCbbAA 结果: fedCBA., bbCCAA

原始数据文件存放的格式是: 每行的宽度均小于80个字符, 含标点符号和空格。注意: 部分源程序存放在PROG1.C中。

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

类型：字符串（单词）的倒置和删除。答案：

void SortCharD(void) /*标准答案*/ {int I,j,k,strl; char ch;

for(I=0;I{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()的内容。 -----------------

类型：字符串（单词）的倒置和删除。答案：

void ConvertCharA(void) /*标准答案*/ {int I,j,str;

for(I=0;Iif(xx[I][j]=='z')xx[I][j]='a';

else if(xx[I][j]>='a'&&xx[I][j]<='y') xx[I][j]+=1; } }

题目11：下列程序的功能是：把s字符串中的所有字母改写成该字母的下一个字符，字母z改写成字母a。要求大写字母仍为大写字母，小写字母仍为小写字母，其他字符不做改变。请编写函数chg(char *s)实现程序的要求，最后调用函数readwriteDat()把结果输出到文件out.dat中。例如：s字符串中原有的内容为：Mn.123Zxy，则调用该函数后，结果为No.123Ayz。注意：部分源程序已给出。

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

void chg(char*s) /*标准答案*/ {while(*s)

if(*s=='z'||*s=='Z') {*s-=25;s++;}

else if(*s>='a'&&*s<='y') {*s+=1;s++;}

else if(*s>='A'&&*s<='Y') {*s+=1;s++;} else s++; }

题目12：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按产品名称从小到大进行排列, 若产品名称相同, 则按金额从小到大进行排列.最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT5.DAT中。

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

请勿改动主函数main( )、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------------- void SortDat() /*标准答案*/ { int i, j; PRO xy;

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

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

if (strcmp(sell[i].mc, sell[j].mc) > 0) {

xy = sell[i];

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

else if (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; } } }

题目13：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按产品代码从小到大进行排列，若产品代码相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT6.DAT中。

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

请勿改动主函数main( )、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------------- void SortDat() /*标准答案*/ { int i, j; PRO xy;

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

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

if (strcmp(sell[i].dm, sell[j].dm) > 0) {

xy = sell[i];

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

else if (strcmp(sell[i].dm, sell[j].dm) == 0) {

if (sell[i].je < sell[j].je) {

xy = sell[i];

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

题目14：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 依次从数组a中取出一个四位数，如果该数连续大于该四位数以后的5个数且该数是奇数，则统计出满足此条件的个数cnt, 并把这些四位数按从小到大的顺序存入数组b中。并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函

数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/ {int I,j,flag=0; int k;

for(I=0;I{for(j=I+1;j<=I+5;j++) {if (a[I]>a[j]) flag=1;

else {flag=0;break;} if (a[I]%2==0) flag=0;} if (flag==1)

{b[cnt]=a[I]; cnt++;} } for(I=0;Ib[j])

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

题目15：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是:若一个四位数的千位数字上的值小于等于百位数字上的值，百位数字上的值小于等于十位数字上的值，十位数字上的值小于等于个位数字上的值，并且此四位数是偶数，则统计出满足此条件的个数cnt, 并把这些四位数按从大到小的顺序存入数组b中。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。

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

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

请勿改动主函数main()、读函数readDat()和写函数writeDat()的内容。 ------------------------- void jsVal() /*标准答案*/ {int I,j;

int a1,a2,a3,a4,k; for (I=0;I{a1=a[I]/1000; a2=a[I]%1000/100; a3=a[I]%100/10; a4=a[I]%10;

if ((a1<=a2)&&(a2<=a3)&&(a3<=a4)&&(a[I]%2==0)) {b[cnt]=a[I]; cnt++;} }

for(I=0;Ib[j])

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

}

题目16：函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中，请编制函数StrCharJR()，其函数的功能是：以行为单位把字符串中所有字符的ASCII值右移4位，然后把右移后的字符ASCII值再加上原字符的ASCII值，得到新的字符仍存入原字符串对应的位置上。最后把已处理的字符串仍按行重新存入字符串数组xx中，最后调用函数writeDat()把结果xx输出到文件OUT8.DAT中。原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。注意：部分源程序已给出。

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

void StrCharJR(void) /*标准答案*/ {int I,j,strl;

for(I=0;I>4; } }

题目17：函数READDAT（）实现从文件IN.DAT中读取一篇英文文章存入到字符串数组XX中;请编制函数CHA(),其函数功能是:以行为单位把字符串中的第一个字符的ASCII值加第二个字符的ASCII值，得到第一个亲朋字符，第二个字符的ASCII值加第三个字符的ASCII值，得到第二个新字符，依此类推一直处理到最后第二个字符，最后一个字符的ASCII值加原第一个字符的ASCII值，得到最后一个新的字符，得到的新字符分别存放在原字符串对应的位置上。最后把已处理的字符串逆转后按行重新存入字符串数组XX中,最后调用函数WRITEDAT()把结果XX输出到文件OUT9.DAT中.原始数据文件存放的格式是:每行的宽度均小于80个字符,含标点符号和空格. 注意：部分源程序已给出。

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数writeDat()的内容。 ----------------------- void ChA(void) /*标准答案*/ {int I,j,k,str; char ch;

for(I=0;Ifor(j=0;jfor(j=0,k=str-1;jxx[I][j]=xx[I][k]; xx[I][k]=ch;} }

}

题目18：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS10.DAT中。替代关系：f(p)=p*11 mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果原字符的ASCII值是偶数或计算后f(p)值小于等于32，则该字符不变，否则将f(p)所对

应的字符进行替代。

注意：部分源程序已给出。原始数据文件存放的格式是：每行的宽度均小于80个字符。请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ------------------------------ void encryptChar() /*标准答案*/ {int I; char *pf;

for(I=0;Iwhile(*pf!=0)

{if(*pf%2==0||*pf*11%256<=32) ; else

*pf=*pf*11%256; pf++; } } }

题目19：编写一个函数findstr(),该函数统计一个长度为2的子字符串在另一个字符串中出现的次数。例如：假定输入的字符串为\"asd asasdfg asd as zx67 asd mklo\子字符串为\"as\"，函数返回值为6。

函数readwriteDat()的功能是实现从文件in.dat中读取两个字符穿4，并调用函数findstr()，最后把结果输出到文件out.dat中。注意：部分源程序已给出。

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

int findStr(char *str,char *substr) { int n;

char *p , *r; n=0;

while ( *str ) { p=str; r=substr; while(*r)

if(*r==*p) { r++; p++; } else break; if(*r=='\\0') n++;

str++; } return n; }

题目20：编写函数jsvalue，它的功能是：求Fibonacci数列中大于t的最小的一个数，结果由函数返回。其中Fibonacci数列F(n)的定义为： F(0)=0,F(1)=1

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

最后调用函数writeDat()读取10个数据t，分别得出结果且把结果输出到文件out.dat中。例如：当t=1000时，函数值为：1597。注意：部分源程序已给出。

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

int jsValue(int t) /*标准答案*/ { int f1=0,f2=1,fn; fn=f1+f2; while(fn<=t) {f1=f2; f2=fn; fn=f1+f2;} return fn; }

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

（1）取X1初值为0.0；

（2）X0=X1，把X1的值赋给X0；（3）X1=COS（X0），求出一个新的X1；

（4）若X0-X1绝对值小0.000001,执行步骤(5),否则执行步骤(2); (5)所求X1就是方程cos(X)-X=0的一个实根,作为函数值返回。请编写函数countvalue（）实现程序的要求，最后调用函数WRITEDAT（）把结果输出到文件OUT17.DAT中。

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

请勿改动主函数main(）和输出数据函数writeDAT（）的内容。 ----------------------------- float countValue() /*标准答案*/ {float x0,x1=0.0; while(1) {x0=x1; x1=cos(x0);

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

return x1; }

题目22：请编写函数countvalue()，它的功能是：求n以内（不包括n）同时能被3和7整数的所有自然数之和的平方根s，并作为函数值返回，最后结果s输出到文件out.dat中。例如若n为1000时，函数值应为：s=153.909064。注意：部分源程序已给出。

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

double countValue(int n) /*标准答案*/ {double xy=0.0; int I;

for(I=1;Iif(I%3==0&&I%7==0) xy+=I; xy=sqrt((double)xy); return xy; }

double countvalue(int n) { int i,j=0; double k;

for(i=0;ik=sqrt(j); return k; }

题目23:已知在文件in.dat中存有N个（个数<200）四位数字的正整数，函数readdat()读取这N个正整数并存入数组xx中。请编制函数calvalue()，其功能要求：1、求出这N个实数的平均值aver；2、分别求出这N个实数的整数部分之和sumint以及小数部分之和sumdec，最后调用函数writedat()把所求的结果输出到文件out.dat中。注意：部分源程序已给出。

请勿改动主函数main()、读数据函数readdat()和输出数据函数writedat()的内容。 ---------------------------- void CalValue(void) /*标准答案*/ {int I;

double x,sum=0;

for (I=0;Iaver=sum/MAXNUM; }

题目24：在三位整数(100至999)中寻找符合条件的整数并依次从小到大存入数组中；它既是完全平方数，又是两位数字相同，例如144、676等。请编制函数实现此功能，满足该条件的整数的个数通过所编制的函数返回。最后调用函数writeDat()把结果输出到文件out.dat中。注意：部分源程序已给出。

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

jsValue(int a[10][9]) /*标准答案*/ {int I,j,k=0;

int hun,ten,data;

for(I=100;I<=999;I++) {j=10;

while(j*j<=I) {if (I==j*j)

{hun=I/100;data=I-hun*100; ten=data/10;data=data-ten*10; if(hun==ten||hun==data||ten==data) {bb[k]=I;k++;} }

j++;} }

return k; }

题目25：下列程序的功能是：寻找并输出11至999之间的数m，它满足m,m2和m3均为回文数。所谓回文数是指其各位数字左右对称的整数，例如121，676，94249等。满足上述条件的数如m=11,m2=121,m3=1331皆为回文数。请编制函数int svalue(long m)实现此功能，如果是回文数，则函数返回1，反之则返回0。最后把结果输出到文件out.dat中。注意：部分源程序已给出。

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

int jsValue(long n) /*标准答案*/ {int I,strl,half; char xy[20]; ltoa(n,xy,10); strl=strlen(xy); half=strl/2;

for(I=0;Iif(xy[I]!=xy[--strl]) break; if(I>=half) return 1; else return 0; }

题目26:已知在文件in.dat中存有若干个（个数<200）四位数字的正整数，函数readdat()读取这若干个正整数并存入数组xx中。请编制函数calvalue()，其功能要求：1、求出这文件中共有多少个正整数totnum；2、求这些数右移1位后，产生的新数是偶数的数的个数totcnt，以及满足此条件的这些数（右移前的值）的算术平均值totpjz，最后调用函数writedat()把所求的结果输出到文件out.dat中。

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

请勿改动主函数main()、读数据函数readdat()和输出数据函数writedat()的内容。 ---------------------------- void CalValue(void) /*标准答案*/ {int I,data;

for(I=0;Iif(xx[I]>0) totNum++; data=xx[I]>>1;

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

totPjz/=totCnt; }

题目27：已知数据文件IN.DAT中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsvalue()，其功能是：求出千位数上的数减百位数减十位数上的数减个位数上的数大于零的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2，最后调用写函数writeDat()把结果输出到OUT.DAT文件。例如：9123,9-1-2-3>0，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。

9812,9-8-1-2<0,则该数不满足条件计算平均值pjz2. 注意：部分源程序已给出。

程序中已定义数组：a[300]，已定义变量：cnt

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

void jsValue() /*标准答案*/ {int I,thou,hun,ten,data,j; for(I=0;I<300;I++)

{thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10;

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

for(I=0;Ib[j])

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

题目28：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 把千位数字和十位数字重新组成一个新的十位数ab(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的十位数字), 以及把个位数字和百位数字组成另一个新的十位数cd (新十位数的十位数字是原四位数的个位数字,新十位数的个位数字是原四位数的百位数字), 如果新组成的两个十位数ab-cd>=0且ab-cd<=10且两个数均是奇数, 同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/ {int I,thou,hun,ten,data,j; int 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&&ab%2==1&&cd%2==1&&ab!=0&&cd!=0) {b[cnt]=a[I];cnt++;} }

for(I=0;I{data=b[I]; b[I]=b[j];b[j]=data;} }

题目29：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 把千位数字和十位数字重新组成一个新的十位数ab(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的十位数字), 以及

把个位数字和百位数字组成另一个新的十位数cd (新十位数的十位数字是原四位数的个位数字,新十位数的个位数字是原四位数的百位数字), 如果新组成的两个十位数ab-cd>=10且ab-cd<=20且两个数均是偶数,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/

{int i, thou, hun, ten, data, j; int 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;

if (thou==0 || data==0) continue;

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

if ((ab-cd)>=10 && (ab-cd)<=20 && ab%2==0 && cd%2==0) {

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

for (i=0; idata = b[i]; b[i] = b[j]; b[j] = data; } }

题目30：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 依次从数组a中取出一个四位数，如果该数连续小于该四位数以后的5个数且该数是偶数，则统计出满足此条件的个数cnt, 并把这些四位数按从小到大的顺序存入数组b中。并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()

的内容。

------------------------- void jsVal() /*标准答案*/ {int I,j,flag=0;

for(I=0;Ielse flag=0;

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

if (flag==0) break;}

if(flag==1) {b[cnt]=a[I];cnt++;} }

for(I=0;Ib[j])

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

题目31：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按产品代码从大到小进行排列，若产品代码相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT6.DAT中。

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

请勿改动主函数main( )、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------------- void SortDat() /*标准答案*/ {int I,j; PRO xy;

for(I=0;I<99;I++) for(j=I+1;j<100;j++)

if(sell[I].je{xy=sell[I]; sell [I]=sell[j]; sell[j]=xy;} else if(sell[I].je==sell[j].je)

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

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

题目32：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按产品名称从大到小进行排列, 若产品名称相同, 则按金额从小到大进行排列. 最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出

到文件OUT7.DAT中。

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

请勿改动主函数main( )、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------------- void SortDat() /*标准答案*/ {int I,j; PRO xy;

for(I=0;Iif(strcmp(sell[I].mc,sell[j].mc)<0)

{xy=sell[I]; sell [I]=sell[j]; sell[j]=xy;} else if(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，奇数的平均值ave1，偶数的平均值ave2以及所有奇数的方差totfc的值，最后调用函数WriteDat()把结果输出到OUT.DAT文件中。计算方差的公式如下：totfc=1/N∑(xx[i]-ave1)2

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

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

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

请勿改动主函数main()和输出数据函数writeDat()的内容。 ------------------------------ int ReadDat(void) /*标准答案*/ {

FILE *fp; int i, j;

if ((fp = fopen(\"IN.DAT\ return 1;

/**************************************/ for (i=0; i<100; i++) {

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

fscanf(fp, \"%d,\ fscanf(fp, \"\\n\"); if (feof(fp)) break; }

/**************************************/ fclose(fp); return 0; }

void Compute(void) {

int i, yy[MAX];

for (i=0; i<1000; i++) if (xx[i]%2) {

odd++;

ave1 += xx[i]; } else {

even++;

ave2 += xx[i];

yy[even-1] = xx[i]; }

ave1 /= odd; ave2 /= even;

for (i=0; itotfc += (yy[i]-ave2)*(yy[i]-ave2)/even;

题目34：下列程序的功能是：选取出100以上1000以内所有个位数字与十位数字之和被10除所得余数恰是百位数字的素数（如293）。计算并输出上述这些素数的个数CNT以及这些素数值的和SUM。请编写函数COUNTvalue（）实现程序要求，最后调用函数WRITEDAT（）把结果CNT和SUM输出到文件OUT.DAT中.

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

请勿改动主函数main()和函数readwriteDAT()的内容。 -------------- 类型：素数。

void countValue() /*标准答案*/ {int I,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;

for(j=2;j=half)

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

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

下列程序的功能是：要求依次对于整数M=100,1000和10000求出对应的n值，使其满足：Sn=M，这里Sn=A1+A2+...+An，

并依次把n值存入数组单元b[0],b[1]和b[2]中，请编制jsvalue()函数来实现此功能，最后调用函数writeDat()把数组b[]中的值输出到out.dat文件中。注意: 部分源程序存在文件PROG1.C文件中。

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

void jsvalue() /*标准答案*/ {int a1=1,a2=1,n=1,an; int sum0,sum; sum0=a1+a2; while(1) {an=a1+a2*2; sum=sum0+an;

a1=a2; a2=an; n++;

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

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

jsvalue()

{int a1=1,a2=1,a12,sn,k=2; sn=a1+a2; while(1)

{a12=a1+2*a2;

if(sn<100&&sn+a12>=100) b[0]=k; if(sn<1000&&sn+a12>=1000) b[1]=k;

if(sn<10000&&sn+a12>=10000) {b[2]=k;break;} sn=sn+a12; a1=a2;a2=a12; k++; } }

题目36：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS6.DAT中。替代关系：f(p)=p*11 mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果计算后f(p)值小于等于32或f(p)对应的字符是数字0至9，则该字符不变，否则将f(p)所对应的字符进行替代。

for(I=0;Iwhile(*pf!=0)

{if((*pf*11%256>='0'&&*pf*11%256<='9')||*pf*11%256<=32) {pf++;continue;} *pf=*pf*11%256; pf++;} }

}

题目37：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS6.DAT中。替代关系：f(p)=p*11mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果原字符是大写字母或计算后f(p)值小于等于32，则该字符不变，否则将f(p)所对应的字符进行替代。

for(I=0;Iwhile(*pf!=0)

{ if ((*pf>='A'&&*pf<='Z')||*pf*11%256<=32) {pf++;continue;} *pf=*pf*11%256; pf++;} } }

题目38：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按产品代码从小到大进行排列, 若产品代码相同, 则按金额从小到大进行排列. 最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT9.DAT中。

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

请勿改动主函数main( )、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------------- void SortDat() /*标准答案*/ {int I,j; PRO xy;

for(I=0;Iif(strcmp(sell[I].dm,sell[j].dm)>0)

{xy=sell[I]; sell[I]=sell[j]; sell[j]=xy;} else if(strcmp(sell[I].dm,sell[j].dm)==0) if(sell[I].je>sell[j].je)

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

题目39：对10个候选人进行选举，现有一个100条记录的选票数据文件IN.DAT，其数据存放的格式是每条记录的长度均为10位，第一位表示第一个人的选中情况，第二位表示第二个人的选中情况，依此类推：内容均为字符0和1，1表示此人被选中，0表示此人未被选中，全选或不选均为无效的选票.。给定函数ReadDat()的功能是把选票数据读入到字符串数组xx中。请编制函数CountRs()

来统计每个人的选票数并把得票数依次存入yy[0]到yy[9]中。把结果yy输出到文件OUT.DAT中。注意：部分源程序已给出。

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数writeDat()的内容。 ---------------------- 类型：选票问题。

void CountRs(void) /*标准答案,有问题!!!*/ {int I,j=0,k=0; char *str;

for(I=0;I<10;I++) yy[I]=0;

for(I=0;I<100;I++) {str=xx[I];j=0; while(*str)

if(*str=='1'){j++;str++;} else str++;

if(j!=0&&j!=10) {str=xx[I];k=0; while(*str)

if(*str++=='1') yy[k++]+=1; else k++;} } }

题目40:已知在文件in.dat中存有若干个（个数<200）四位数字的正整数，函数readdat()读取这若干个正整数并存入数组xx中。请编制函数calvalue()，其功能要求：1、求出这文件中共有多少个正整数totnum；2、求出这些数中的各位数字之和是偶数的数的个数totcnt，以及满足此条件的这些数的算术平均值totpjz，最后调用函数writedat()把所求的结果输出到文件out.dat中。注意：部分源程序已给出。

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

void CalValue(void) /*标准答案，有问题!!!*/ { int i, thou, hun, ten, data; int ab;

long sum = 0;

for (i=0; iif (xx[i] > 0) totNum++;

thou = xx[i]/1000; hun = xx[i]%1000/100; ten = xx[i]%100/10; data = xx[i]%10;

ab = thou+hun+ten+data; if (ab%2 == 0) {

totCnt++;

sum = sum+xx[i]; }

}

totPjz = (double)sum/totCnt;}

题目41：下列程序的功能是：计算出自然数SIX和NINE，它们满足的条件是SIX+SIX+SIX=NINE+NINE的个数cnt，以及满足此条件所有的SIX与NINE的和SUM。请编写函数countvalue()实现程序的要求，最后调用函数writedat()把结果cnt和sum，输出到文件out15.dat中.其中S，I，X，N，E各代表一个十进制数字。

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

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

void countValue() /*标准答案,有问题!!!*/ { int S, I, X, N, E; int SIX, NINE;

for (S=1; S<10; S++) for (I=0; I<10; I++) for (X=0; X<10; X++) for (N=1; N<10; N++) for (E=0; E<10; E++) {

SIX = S*100+I*10+X;

NINE = N*1000+I*100+N*10+E; if (SIX*3 == NINE*2) {

cnt++;

sum += SIX+NINE; } } }

题目42：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按产品名称从大到小进行排列, 若产品名称相同, 则按金额从大到小进行排列. 最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT8.DAT中。

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

请勿改动主函数main( )、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------------- void SortDat() /*标准答案*/ {int I,j; PRO xy;

for(I=0;I<99;I++) for(j=I+1;j<100;j++)

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

{xy=sell[I]; sell [I]=sell[j]; sell[j]=xy;} else if(strcmp(sell[I].mc,sell[j].mc)==0) if(sell[I].je22

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

题43：函数ReadDat()实现从文件in.dat中读取20行数据存放到字符串数组xx中(第行字符串长度均小于80)。请编制函数jsSort()，其函数的功能是：以行为单位对字符串变量的下标为奇数的字符按其ASCII值从小到大的顺序进行排序，排序后的结果仍按行重新存入字符串数组xx中，最后调用函数WriteDat()把结果xx输出到文件out.dat中。例如：位置 0 1 2 3 4 5 6 7 源字符串 h g f e d c b a 则处理后字符串 h a f c d e b g 部分源程序已给出。

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ------------------------- 类型：字符串左右排序和比较。 void jsSort() /*标准答案*/ {int I,j,k,strl; char ch;

for(I=0;I<20;I++) {strl=strlen(xx[I]);

for(j=1;jxx[I][k])

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

题44：函数ReadDat()实现从文件in.dat中读取20行数据存放到字符串数组xx中(第行字符串长度均小于80)。请编制函数jsSort()，其函数的功能是：以行为单位对字符串按给定的条件进行排序，排序后的结果仍按行重新存入字符串数组xx中，最后调用函数WriteDat()把结果xx输出到文件out.dat中。

条件：从字符串中间一分为二，左边部分按字符的ASCII值降序排序，排序后左边部分与右边部分进行交换。如果原字符串长度为奇数，则最中间的字符不参加处理，字符仍放在原位置上。例如：位置 0 1 2 3 4 5 6 7 8 源字符串 a b c d h g f e 1 2 3 4 9 8 7 6 5 则处理后字符串 h g f e d c b a 8 7 6 5 9 4 3 2 1 部分源程序已给出。

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ------------------------- 类型：字符串左右排序和比较。 void jsSort() /*标准答案*/ {int I,j,k,strl,half; char ch;

for(I=0;I<20;I++) {strl=strlen(xx[I]); half=strl/2;

for(j=0;j{ch=xx[I][j];xx[I][j]=xx[I][k];xx[I][k]=ch;} for(j=half-1,k=strl-1;j>=0;j--,k--)

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

题目45：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 依次从数组a中取出一个四位数，如果该数连续大于该四位数以前的5个数且该数是偶数，则统计出满足此条件的个数cnt, 并把这些四位数按从大到小的顺序存入数组b中。并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/ {int I,j,flag=0;

for(I=5;Ia[j]) flag=1;

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

if (flag==0) break;}

if(flag==1) {b[cnt]=a[I];cnt++;} }

for(I=0;I{flag=b[I];b[I]=b[j];b[j]=flag;} }

题目46：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 依次从数组a中取出一个四位数，如果该数连续大于该四位数以前的5个数且该数是奇数，但该数必须能被7整除。则统计出满足此条件的个数cnt, 并把这些四位数按从大到小的顺序存入数组b中。并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。

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

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

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

------------------------- void jsVal() /*标准答案*/ {int I,j,flag=0;

for(I=5;Ia[j]) flag=1;

else {flag=0;break;}}

if (flag==1&&a[I]%2==1&&a[I]%7==0) {b[cnt]=a[I];cnt++;} }

for(I=0;I{flag=b[I];b[I]=b[j];b[j]=flag;} }

题目47：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：金额从大到小进行排列, 若金额相等, 则按产品代码从小到大进行排列. 最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT3.DAT中。

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

请勿改动主函数main( )、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------------- void SortDat() /*标准答案*/ {int I,j; PRO xy;

for(I=0;Iif(sell[I].je{xy=sell[I]; sell [I]=sell[j]; sell[j]=xy;} else if(sell[I].je==sell[j].je)

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

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

题目48：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出千位数上的数加个位数上的数等于百位数上的数加十位数上的数的个数CNT,再把所有满足条件的四位数依次存入数组bb中,然后对数组bb的四位数按从小到大的顺序进行排序,最后调用写函数WRITEDAT()把数组b中的数输出到OUT.DAT文件.

例如:6712,6+2=7+1,则该数满足条件存入数组bb中,且个数CNT=CNT+1. 8129,8+1<>2+9,则该数不满足条件忽略. 注意：部分源程序已给出。

程序中已定义数组：a[300]，已定义变量：cnt

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

void jsValue() /*标准答案*/ {int I,thou,hun,ten,data,j; for(I=0;I<300;I++)

{thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10;

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

for(I=0;Ib[j])

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

题目49：已知数据文件IN.DAT中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsvalue()，其功能是：求出千位数上的数减百位数减十位数上的数减个位数上的数大于零的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2，最后调用写函数writeDat()把结果输出到OUT.DAT文件。例如：9123,9-1-2-3>0，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。

9812,9-8-1-2<0,则该数不满足条件计算平均值pjz2. 注意：部分源程序已给出。

程序中已定义数组：a[300]，已定义变量：cnt

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

void jsValue() /*标准答案*/ {int I,thou,hun,ten,data,n=0; for(I=0;I<300;I++)

{thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10; if (thou-hun-ten-data>0) {cnt++;pjz1+=a[I];} else {n++;pjz2+=a[I];} }

pjz1/=cnt;pjz2/=n; }

题目50：函数ReadDat()实现从文件in.dat中读取20行数据存放到字符串数组xx中(每行字符串长度均小于80)。请编制函数jsSort()，其函数的功能是：以行为单位对字符串按给定的条件进行排序，排序后的结果仍按行重新存入字符串数组xx中，最后调用函数WriteDat()把结果xx输出到文件out.dat中。

条件：从字符串中间一分为二，左边部分按字符的ASCII值升序排序，排序后左边部分与右边部分进行交换。如果原字符串长度为奇数，则最中间的字符不参加处理，字符仍放在原位置上。例如：位置 0 1 2 3 4 5 6 7 8 源字符串 d c b a h g f e 4 3 2 1 9 8 7 6 5

则处理后字符串 h g f e a b c d 8 7 6 5 9 1 2 3 4 部分源程序已给出。

请勿改动主函数main()、读函数ReadDat()和写函数WriteDat()的内容。 ---------------------------- 类型：字符串左右排序和比较.

注：先采用冒泡法对左边部分进行升序排序，然后将排序后的左半与右半按对应位进行调换。

void jsSort()

{ int i, j, k, strl, half; char ch;

for (i=0; i<20; i++) {

strl = strlen(xx[i]); half = strl/2;

for (j=0; j xx[i][k]) {

ch = xx[i][j];

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

for (j=half-1, k=strl-1; j>=0; j--, k--) {

ch = xx[i][j];

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

题目51：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 把千位数字和十位数字重新组成一个新的十位数(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的十位数字), 以及把个位数字和百位数字组成另一个新的十位数 (新十位数的十位数字是原四位数的个位数字,新十位数的个位数字是原四位数的百位数字), 如果新组成的两个十位数均是素数,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。

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

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/ {int I,thou,hun,ten,data,j; int 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 (isprime(ab)&&isprime(cd)&&ab!=0&&cd!=0) {b[cnt]=a[I];cnt++;} }

for(I=0;I{data=b[I];b[I]=b[j];b[j]=data;} }

题目52：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 把千位数字和个位数字重新组成一个新的十位数(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的个位数字), 以及把十位数字和百位数字组成另一个新的十位数 (新十位数的十位数字是原四位数的百位数字,新十位数的个位数字是原四位数的十位数字), 如果新组成的两个十位数均是奇数并且两个十位数中至少有一个能被5整除,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/

{ int i, thou, hun, ten, data, j; int 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;

if (thou==0 || hun==0) continue;

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

if (ab%2==1 && cd%2==1 && (ab%5==0 || cd%5==0)) {

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

for (i=0; i28

if (b[i] < b[j]) {

data = b[i]; b[i] = b[j]; b[j] = data; } }

题目53：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出个位数上的数减千位数上的数减百位数上的数减十位数上的数大于零的个数cnt，再把所有满足此条件的四位数依次存入数组b中，然后对数组b的四位数按从大到小的顺序进行排序，最后调用写函数WRITEDAT()把数组b中的数输出到OUT.DAT文件. 例如：1239，9-1-2-3>0，则该数满足条件存入数组b中，且个数cnt=cnt+1. 8129，9-8-1-2<0，则该数不满足条件忽略。注意：部分源程序已给出。

程序中已定义数组：a[300]，已定义变量：cnt

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

void jsValue() /*标准答案*/

{ int i, thou, hun, ten, data, j; for (i=0; i<300; i++) {

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

if (thou-hun-ten-data > 0) {

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

for (i=0; i b[j]) {

data = b[i]; b[i] = b[j]; b[j] = data; }}

题目54：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出千位数上的数加个位数上的数等于百位数上的数加十位数上的数的个数CNT,再把所有满足条件的四位数依次存入数组b中,然后对数组b的四位数按从大到小的顺序进行排序,最后调用写函数WRITEDAT()把数组b中的数输出到OUT.DAT文件. 例如:7153,7+1=5+3,则该数满足条件存入数组bb中,且个数CNT=CNT+1. 8129,8+1<>2+9,则该数不满足条件忽略. 注意：部分源程序已给出。

程序中已定义数组：a[300]，已定义变量：cnt

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

void jsValue() /*标准答案*/ {int I,thou,hun,ten,data,j; for(I=0;I<300;I++) {thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10;

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

for(I=0;I{data=b[I];b[I]=b[j];b[j]=data;} }

题目55：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出所有这些四位数是素数的个数cnt，再把所有满足此条件的四位数依次存入数组b中，然后对数组b的四位数按从小到大的顺序进行排序，最后调用写函数writeDat()把结果输出到OUT.DAT文件。

例如：5591是素数，则该数满足条件存入数组b中，且个数cnt=cnt+1。 9812是非素数，则该数不满足条件忽略。注意：部分源程序已给出。

程序中已定义数组：a[300]，b[300]，已定义变量：cnt

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

void jsValue() /*标准答案*/ {int j,I,value;

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

if(isP(a[I])) {b[cnt]=a[I];cnt++;} for(I=0;Ib[j])

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

题目56：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS5.DAT中。替代关系：f(p)=p*11mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果计算后f(p)值小于等于32或f(p)对应的字符是小写字母，则该字符不变，否则将f(p)所对应的字符进行替代。

注意：部分源程序已给出。原始数据文件存放的格式是：每行的宽度均小于80个字符。请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ------------------------------

void encryptChar() /*标准答案*/ {int I; char *pf;

for(I=0;Iwhile(*pf!=0)

{if ((*pf*11%256>='a'&&*pf*11%256<='z')||*pf*11%256<=32) {pf++;continue;} *pf=*pf*11%256; pf++;} } }

题目57：设有n个人围坐一圈并按顺时针方向从1到n编号，从第s个人开始进行1到m的报数，报数到第个m人，此人出圈，再从他的下一个人重新开始1到m的报数，如此进行下去直到所有的人都出圈为止。现要求按出圈次序，每10人一组，给出这n个人的顺序表。请考生编制函数Josegh()实现此功能并调用函数WriteDat()把结果p输出到文件OUT.DAT中。设n=100,s=1,m=10.

(1)将1到n个人的序号存入一维数组p中；

(2)若第i个人报数后出圈，则将p[i]置于数组的倒数第i个位置上，而原来第i+1个至倒数第i个元素依次向前移动一个位置；

(3)重复第(2)步直至圈中只剩下p[1]为止。部分源程序已给出。

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

void Josegh(void) /*标准答案*/ {int I,j,k,s1,w; s1=s;

for(I=1;I<=n;I++) p[I-1]=I; for(I=n;I>=2;I--) {s1=(s1+m-1)%I; if (s1==0) s1=I; w=p[s1-1];

for(j=s1;j<=I-1;j++) p[j-1]=p[j]; p[I-1]=w;} }

题目58：对10个候选人进行选举，现有一个100条记录的选票数据文件IN.DAT，其数据存放的格式是每条记录的长度均为10位，第一位表示第一个人的选中情况，第二位表示第二个人的选中情况，依此类推：内容均为字符0和1，1表示此人被选中，0表示此人未被选中，若一张选票人数小于等于5个人时被认为无效的选票。给定函数ReadDat()的功能是把选票数据读入到字符串数组xx中。请编制函数CountRs()来统计每个人的选票数并把得票数依次存入yy[0]到yy[9]中。把结果yy输出到文件OUT.DAT中。

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

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数writeDat()的内容。 ---------------------- 类型：选票问题。

void CountRs(void) /*标准答案,有问题!!!*/

{int I,count,j; char *pf;

for(I=0;I<10;I++) yy[I]=0; for(I=0;I<100;I++) {pf=xx[I];count=0; while (*pf)

if(*pf=='1'){count++;pf++;} else pf++; if (count>5)

{pf=xx[I]; j=0; while (*pf)

if (*pf=='1') {yy[j]+=1;j++;pf++;} else if (*pf=='0') {pf++;j++;} } } }

题目59：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 把千位数字和十位数字重新组成一个新的十位数ab(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的十位数字), 以及把个位数字和百位数字组成另一个新的十位数cd (新十位数的十位数字是原四位数的个位数字,新十位数的个位数字是原四位数的百位数字), 如果新组成的两个十位数ab程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/ {int I,thou,hun,ten,data,j; int 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%2==1&&ab%5!=0)&&cd%2!=1&&ab!=0&&cd!=0) {b[cnt]=a[I];cnt++;} }

for(I=0;I{data=b[I];b[I]=b[j];b[j]=data;} }

题目60:在文件in.dat中有200组数据，每组有3个数，每个数均是三位数。函数ReadDat()读取这200组数据存放到结构数组aa中，请编制函数jsSort()，其函数的功能是：要求在200组数据中找出条件为每组中的第二个数大于第一个数加第三个数的之和，其中满足条件的个数作为函数jsSort() 的返回值，同时把满足条件的数据存入结构数组bb中，再对bb中的数据按照每组数据的第二个数加第三个之和的大小进行升序排列(第二个数加第三个数的和均不相等)，排序后的结果仍重新存入结构数组bb中，最后调用函数WriteDat()把结果bb输出到文件out.dat中。注意：部分源程序已给出。

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ----------------------------------- int jsSort() /*标准答案*/ { int i, cnt = 0, j; data ch;

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

if (aa[i].x2 > aa[i].x1+aa[i].x3) {

bb[cnt] = aa[i]; cnt++; }

for (i=0; iif (bb[i].x2+bb[i].x3 < bb[j].x2+bb[j].x3) {

ch = bb[i]; bb[i] = bb[j]; bb[j] = ch; } return cnt; }

题目61：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按金额从小到大进行排列, 若金额相等, 则按产品代码从大到小进行排列. 最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT2.DAT中。

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

请勿改动主函数main( )、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------------- void SortDat() /*标准答案*/ {int I,j; PRO xy;

for(I=0;I<99;I++) for(j=I+1;j<100;j++)

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

{xy=sell[I]; sell [I]=sell[j]; sell[j]=xy;} else if(sell[I].je==sell[j].je)

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

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

题目62：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS2.DAT中。替代关系：f(p)=p*13 mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果计算后f(p)值小于等于32或其ASCII值是偶数，则该字符不变，否则将f(p)所对应的字符进行替代。

void encryptChar() /*标准答案,有问题!!!*/ {

int i; char *pf;

for (i=0; ipf = xx[i];

while (*pf != 0) {

if ((*pf*13%256)%2==0 || *pf*13%256<=32) {

pf++;

continue; }

*pf = *pf*13%256; pf++; } } }

题目63：下列程序的功能是:把S字符串中的所有字符左移一个位置,串中的第一个字符移到最后.请编写函数CHG(CHAR *S)实现程序要求,最后调用函数READWRITEDAT()把结果输出到OUT.DAT文件中.

例如:S字符串中原有内容为:Mn.123xyZ,则调用函数后,结果为:n.123xyZM. 注意：部分源程序已给出。

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

void chg(char*s) /*标准答案*/ {int I,strl; char ch;

strl=strlen(s); ch=*s;

for(I=0;I34

}

题目64：下列程序的功能是：找出所有100以内(含100)满足I，I+4，I+10都是素数的整数I(I+10也在100以内)的个数cnt以及这些I之和sum。请编写函数countvalue()实现程序要求，最后调用函数writeDat()把结果cnt和sum输出到文件out.dat中。注意：部分源程序已给出。

请勿改动主函数main()和函数writeDAT()的内容。 -------------- 类型：素数。

void countValue() /*标准答案*/ { int i;

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

if(isPrime(i) && isPrime(i+4) && isPrime(i+10)) {

cnt++; sum+=i; } }

题目65:已知在文件in.dat中存有若干个（个数<200）四位数字的正整数，函数readdat()读取这若干个正整数并存入数组xx中。请编制函数calvalue()，其功能要求：1、求出这文件中共有多少个正整数totnum；2、求出这些数中的各位数字之和是奇数的数的个数totcnt，以及满足此条件的这些数的算术平均值totpjz，最后调用函数writedat()把所求的结果输出到文件out.dat中。注意：部分源程序已给出。

请勿改动主函数main()、读数据函数readdat()和输出数据函数writedat()的内容。 ---------------------------- void CalValue(void) /*标准答案*/ {int I,thou,hun,ten,data; for(I=0;Iif (xx[I]>0) totNum++; thou=xx[I]/1000; hun=xx[I]%1000/100; ten=xx[I]%100/10; data=xx[I]%10;

if ((thou+hun+ten+data)%2) {totCnt++;totPjz+=xx[I];} } totPjz/=totCnt; }

题目66：下列程序的功能是：计算500-800区间内素数的个数cnt，并按所求素数的值从大到小的顺序，再计算其间隔加、减之各，即第1个素数-第2个素数+第3个素数-第4个素数+第5个素数……的值sum。请编写函数countvalue()实现程序的要求，最后调用函数writedat()把结果cnt和sum，输出到文件out11.dat中。注意：部分源程序已给出。

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

void countValue() /*标准答案,有问题*/

{

int i, j, half, yy[100]; for (i=800; i>=500; i--) {

half = i/2;

for (j=2; j= half) {

yy[cnt] = i; cnt++; } }

for (i=0, j=1; isum += j*yy[i]; j = j*-1; } }

题目67：下列程序的功能是：先出5000以下符合条件的自然数。条件是：千位数字与百位数字之和等于十位数字与个位数字之和，且千位数字与百位数字之和等于个位数字与千位数字之差的确10倍。计算并输出这些四位自然数的个数cnt以及这些数的和sum。请编写函数countvalue()实现程序的要求，最后调用函数writedat()把结果cnt和sum，输出到文件out13.dat中。注意：部分源程序已给出。

请勿改动主函数main()和输入输出数据函数writeDAT()的内容。 ---------------------------- void countValue() /*标准答案*/ {int I,thou,hun,ten,data; for(I=5000;I>=1000;I--) {thou=I/1000; hun=I%1000/100; ten=I%100/10; data=I%10;

if (thou+hun==ten+data&&thou+hun==(data-thou)*10) {cnt++;sum+=I;} } }

题目68：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 如果四位数各位上的数字均是奇数, 则统计出满足此条件的个数cnt, 并把这些四位数按从大到小的顺序存入数组b中。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()

的内容。

------------------------- void jsVal() /*标准答案*/ void jsVal() {

int I,thou,hun,ten,data,j; for(I=0;I<200;I++)

{thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10;

if (thou%2!=0&&hun%2!=0&&ten%2!=0&&data%2!=0) {b[cnt]=a[I];cnt++;} }

for(I=0;I{data=b[I];b[I]=b[j];b[j]=data;} }

题目69：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是:若一个四位数的千位数字上的值减去百位数字上的值减去十位数字上的值再减去个位数字上的值，并且此四位数是奇数，则统计出满足此条件的个数cnt, 并把这些四位数按从小到大的顺序存入数组b中。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

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

请勿改动主函数main()、读函数readDat()和写函数writeDat()的内容。 ------------------------- void jsVal() /*标准答案*/ {int I,thou,hun,ten,data,j; for(I=0;I{thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10;

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

for(I=0;Ib[j])

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

题目70:已知在文件in.dat中存有若干个（个数<200）四位数字的正整数，函数readdat()读取这若干个正整数并存入数组xx中。请编制函数calvalue()，其功能要求：1、求出这文件中共有多少个正整数totnum；2、求这些数右移1位后，产生的新数是奇数的数的个数totcnt，以及满足此条件的这些数（右移前的值）的算术平均值totpjz，最后调用函数writedat()把所求的结果输出到文件out.dat中。

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

请勿改动主函数main()、读数据函数readdat()和输出数据函数writedat()的内容。 ---------------------------- void CalValue(void) /*标准答案*/ {int I,data;

for(I=0;Iif(xx[I]>0) totNum++; data=xx[I]>>1;

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

totPjz/=totCnt; }

题目71：函数ReadDat()实现从文件in.dat中读取20行数据存放到字符串数组xx中(第行字符串长度均小于80)。请编制函数jsSort()，其函数的功能是：以行为单位对字符串按给定的条件进行排序，排序后的结果仍按行重新存入字符串数组xx中，最后调用函数WriteDat()把结果xx输出到文件out.dat中。

条件：从字符串中间一分为二，左边部分按字符的ASCII值降序排序，右边部分按字符的ASCII值升序排序。如果原字符串长度为奇数，则最中间的字符不参加排序，字符仍放在原位置上。例如：位置 0 1 2 3 4 5 6 7 8 源字符串 a b c d h g f e 1 2 3 4 9 8 7 6 5 则处理后字符串 d c b a e f g h 4 3 2 1 9 5 6 7 8 部分源程序已给出。

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ---------------------------- 类型：字符串左右排序和比较。

注：要注意当要进行右半部分排序时，一定要判断原字符串个数是否为奇数，若是则要 half加1，本题对右半部分采用选择法对其进行升序排序。 void jsSort() /*标准答案*/ {int I,j,k,strl,half; char ch;

for(I=0;I<20;I++) {strl=strlen(xx[I]); half=strl/2;

for(j=0;jif (strl%2) half++;

for(j=half;jxx[I][k]) {ch=xx[I][j];

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

题目72：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 把千位数字和个位数字重新组成一个新的十位数(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的个位数字), 以及把十位数字和百位数字组成另一个新的十位数 (新十位数的十位数字是原四位数的百位数字,新十位数的个位数字是原四位数的十位数字), 如果新组成的两个十位数均是偶数并且两个十位数中至少有一个能被9整除,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/ {int I,thou,hun,ten,data,j; int ab,cd;

for(I=0;I{thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10; ab=10*data+thou; cd=10*hun+ten;

if ((ab%9==0||cd%9==0)&&ab%2!=1&&cd%2!=1&&ab!=0&&cd!=0) {b[cnt]=a[I];cnt++;} }

for(I=0;I{data=b[I];b[I]=b[j];b[j]=data;} }

题目73：函数ReadDat( )实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中; 请编制函数ConvertCharD(), 其函数的功能是: 以行为单位把字符串中的所有小写字母改写成该字母的上一个字母, 如果是字母a, 则改写成字母z，大写字母和其它字符保持不变。把已处理的字符串仍按行重新存入字符串数组xx中。最后main()函数调用函数WriteDat()把结果xx输出到文件OUT4.DAT中。

例: 原文: Adb.Bcdza abck.LLhj 结果: Aca.Bbcyz zabj.LLgi

原始数据文件存放的格式是: 每行的宽度均小于80个字符, 含标点符号和空格。注意: 部分源程序存放在PROG1.C中。

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

类型：字符串（单词）的倒置和删除。答案：

void ConvertCharD(void)/*标准答案*/ {int I; char *pf;

for(I=0;Iif (*pf=='a'){*pf='z';pf++;} else if (*pf>='b'&&*pf<='z') {*pf-=1;pf++;} else pf++; } }

题目74：函数READDAT（）实现从文件IN.DAT中读取一篇英文文章存入到字符串数组XX中;请编制函数STRCHARJL(),其函数功能是:以行为单位把字符串中的所有字符的ASCII值左移4位，如果左移后，其字符的ASCII值小于等于32或大于100，则原字符保持不变.否则就把左移后的字符ASCII值再加上原字符的ASCII值，得到新的字符仍存入原字符串对应的位置上。最后把已处理的字符串仍按行重新存入字符串数组XX中,最后调用函数WRITEDAT()把结果XX输出到文件OUT7.DAT文件中.原始数据文件存放的格式是:每行的宽度均小于80个字符,含标点符号和空格. 注意：部分源程序已给出。

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

void StrCharJL(void) /*标准答案, */ {

int i, j, str; char ch;

for (i=0; istr = strlen(xx[i]); for (j=0; jch = xx[i][j]<<4; if (ch>32 && ch<=100) xx[i][j] += ch; } } }

题目75:在文件in.dat中有200组数据，每组有3个数，每个数均是三位数。函数ReadDat()读取这200组数据存放到结构数组aa中，请编制函数jsSort()，其函数的功能是：要求在200组数据中找出条件为每组中的第一个数大于第二个数加第三个数的之和，其中满足条件的个数作为函数jsSort() 的返回值，同时把满足条件的数据存入结构数组bb中，再对bb中的数据按照每组数据的第一个数加第三个之和的大小进行升序排列(第一个数加第三个数的和均不相等)，排序后的结果仍重新存入结构数组bb中，最后调用函数WriteDat()把结果bb输出到文件out.dat中。注意：部分源程序已给出。

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 ----------------------------------- int jsSort() /*标准答案*/ { int i, j, count = 0; data val;

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

if (aa[i].x1 > aa[i].x2+aa[i].x3) {

bb[count] = aa[i]; count++; }

for (i=0; iif (bb[i].x1+bb[i].x3 > bb[j].x1+bb[j].x3) {

val = bb[i]; bb[i] = bb[j]; bb[j] = val; }

return count; }

题目76：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 把千位数字和个位数字重新组成一个新的十位数(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的个位数字), 以及把十位数字和百位数字组成另一个新的十位数 (新十位数的十位数字是原四位数的百位数字,新十位数的个位数字是原四位数的十位数字), 如果新组成的两个十位数必须一个是奇数另一个是偶数，并且两个十位数中至少有一个能被17整除,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/

{ int i, thou, hun, ten, data, j; int 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;

if (data==0 || hun==0) continue;

ab = 10*data+thou;

cd = 10*hun+ten;

if ((ab-cd)%2!=0 && (ab*cd)%17==0) {

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

for (i=0; idata = b[i]; b[i] = b[j]; b[j] = data; } }

题目77：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是:若一个四位数的千位数字上的值加上十位数字上的值等于百位数字上的值加上个位数字上的值，并且此四位数是偶数，则统计出满足此条件的个数cnt, 并把这些四位数按从小到大的顺序存入数组b中。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

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

if ((thou+ten==hun+data)&&a[I]%2!=1) {b[cnt]=a[I];cnt++;} }

for(I=0;Ib[j])

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

题目78：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是:若一个四位数的千位数字上的值大于等于百位数字上的值，百位数字上的值大于等于十位数字上的值，十位数字上的值大于等于个位数字上的值，并且此四位数是奇数，则统计出满足此条件的个数cnt, 并把这些四位数按从小到大的顺序存入数组b中。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。

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

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

if ((thou>=hun)&&(hun>=ten)&&(ten>=data)&&a[I]%2!=0) {b[cnt]=a[I];cnt++;} }

for(I=0;Ib[j])

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

题目79：请编写函数void countvalue(int *a, int *n)，它的功能是：求出1到1000之内能被7或11整除但不能同时被7和11整除的所有整数放在数组a中，并通过n返回这些数的个数。注意：部分源程序已给出。

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

void countValue(int *a,int *n) /*标准答案*/ {int I; *n=0;

for(I=1;I<=1000;I++)

if(I%7==0&&I%11){*a=I;*n=*n+1;a++;}

else if(I%7&&I%11==0) {*a=I;*n=*n+1;a++;} }

题目80：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出个位数上的数减千位数上的数减百位数上的数减十位数上的数大于零的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2，

例如：1239，9-1-2-3>0，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。 8129，9-8-1-2<0，则该数不满足条件计算平均值pjz2. 注意：部分源程序已给出。

程序中已定义数组：a[300]，已定义变量：cnt,pjz1,pjz2.

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

void jsValue() /*标准答案*/ {int I,thou,hun,ten,data,n=0; for(I=0;I<300;I++)

{thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10; if (data-thou-hun-ten>0) {cnt++;pjz1+=a[I];} else {n++;pjz2+=a[I];}

}

pjz1/=cnt;pjz2/=n; }

jsvalue()

{ int i,a1,a2,a3,a4; for(i=0;i<300;i++)

{ a1=a[i]/1000; a2=(a[i]%1000)/100; a3=(a[i]%100)/10; a4=a[i]%10; if(a4-a1-a2-a3>0) { cnt++;

pjz1+=a[i]; } else

pjz2+=a[i]; }

pjz1/=cnt; pjz2/=(300-cnt); }

题目81：已知数据文件IN.DAT中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsvalue()，其功能是：求出千位数上的数加百位数等于十位数上的数加个位数上的数的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2，最后调用写函数把结果输出到OUT.DAT文件。

例如：7153,7+1=5+3，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。 8129,8+1<>2+9,则该数不满足条件计算平均值pjz2. 注意：部分源程序已给出。

程序中已定义数组：a[300]，已定义变量：cnt

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

void jsValue() /*标准答案*/ {int I,thou,hun,ten,data,n=0; for(I=0;I<300;I++)

{thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10; if (thou+hun==ten+data) {cnt++;pjz1+=a[I];} else {n++;pjz2+=a[I];} }

pjz1/=cnt;pjz2/=n; }

题目82：已知数据文件IN.DAT中存有300个四位数,并已调用读函数READDAT()把这些数存入数组A中.请编制一函数SVALUE(),其功能是:求出所有这些四位数是素数的个数CNT,再求出所有满足此条件的四位数平均值PJZ1,以及不满足条件的四位数平均值PJZ2,最后调用写函数WRITEDAT()把结果CNT,PJZ1,PJZ2输出到OUT.DAT文件.

例如:5591是素数,则该数满足条件计算平均值PJZ1,且个数CNT=CNT+1. 9812是非素数,则该数不满足条件计算平均值PJZ2。注意：部分源程序已给出。

程序中已定义数组：a[300]，已定义变量：cnt,pjz1,pjz2.

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

---------------------

void jsValue() /*标准答案*/ {int I;

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

if (isP(a[I])) {pjz1+=a[I];cnt++;} else pjz2+=a[I]; pjz1=pjz1/cnt;

pjz2=pjz2/(300-cnt); }

题目83：请编制函数ReadDat()实现从文件IN.DAT中读取1000个十进制整数到数组xx中；请编制函数Compute()分别计算出xx中奇数的个数odd，奇数的平均值ave1，偶数的平均值ave2以及所有奇数的方差totfc的值，最后调用函数WriteDat()把结果输出到OUT.DAT文件中。计算方差的公式如下：totfc=1/N∑(xx[i]-ave1)2

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

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

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

请勿改动主函数main()和输出数据函数writeDat()的内容。 ------------------------------ int ReadDat(void) /*标准答案*/ { FILE *fp; int i, j;

if ((fp = fopen(\"IN.DAT\ return 1;

for (i=0; i<100; i++) {

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

fscanf(fp, \"%d,\ fscanf(fp, \"\\n\"); if (feof(fp)) break; }

fclose(fp); return 0; }

void Compute(void) {

int i, yy[MAX];

for (i=0; i<1000; i++) if (xx[i]%2) {

odd++;

ave1 += xx[i]; yy[odd-1] = xx[i]; }

else {

even++;

ave2 += xx[i]; }

ave1 /= odd; ave2 /= even;

for (i=0; itotfc += (yy[i]-ave1)*(yy[i]-ave1)/odd; }

题目84：对10个候选人进行选举，现有一个100条记录的选票数据文件IN.DAT，其数据存放的格式是每条记录的长度均为10位，第一位表示第一个人的选中情况，第二位表示第二个人的选中情况，依此类推：内容均为字符0和1，1表示此人被选中，0表示此人未被选中，若一张选票人数大于5个人时认为无效的选票.给定函数ReadDat()的功能是把选票数据读入到字符串数组xx中。请编制函数CountRs()来统计每个人的选票数并把得票数依次存入yy[0]到yy[9]中。把结果yy输出到文件OUT.DAT中。

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

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数writeDat()的内容。 ---------------------- 类型：选票问题。

void CountRs(void) /*标准答案, */ {int I,count,j; char *pf;

for(I=0;I<10;I++) yy[I]=0;

for(I=0;I<100;I++) {pf=xx[I];count=0; while (*pf)

if(*pf=='1'){count++;pf++;} else pf++; if (count<=5) {pf=xx[I]; j=0;

while (*pf)

if (*pf=='1') {yy[j]+=1;j++;pf++;} else if (*pf=='0') {pf++;j++;} } } }

题目85：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是:若一个四位数的个位数字上的值减去千位数字上的值减去百位数字上的值再减去十位数字上的值，并且此四位数是偶数，则统计出满足此条件的个数cnt, 并把这些四位数按从小到大的顺序存入数组b中。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

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

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

------------------------- void jsVal() /*标准答案*/

{ int i, thou, hun, ten, data, j; for (i=0; ithou = a[i]/1000; hun = a[i]%1000/100; ten = a[i]%100/10; data = a[i]%10;

if (data-thou-hun-ten>=0 && a[i]%2!=1) {

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

for (i=0; i b[j]) {

data = b[i]; b[i] = b[j]; b[j] = data; } }

题目86：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是: 把千位数字和十位数字重新组成一个新的十位数ab(新十位数的十位数字是原四位数的千位数字,新十位数的个位数字是原四位数的十位数字), 以及把个位数字和百位数字组成另一个新的十位数cd (新十位数的十位数字是原四位数的个位数字,新十位数的个位数字是原四位数的百位数字), 如果新组成的两个十位数ab>cd, ab必须是偶数且能被5整除, cd必须是奇数,同时两个新数的十位数字均不为零,则将满足此条件的四位数按从大到小的顺序存入数组b中, 并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

程序中已定义数组: a[200], b[200], 已定义变量: cnt 请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。

------------------------- void jsVal() /*标准答案*/

{ int i, thou, hun, ten, data, j; int 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;

if (thou==0 || data==0) continue;

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

if (ab>cd && ab%2==0 && ab%5==0 && cd%2!=0) {

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

for (i=0; idata = b[i]; b[i] = b[j]; b[j] = data; } }

题目87：已知数据文件IN.DAT中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsvalue()，其功能是：求出千位数上的数加个位数等于百位数上的数加十位数上的数的个数cnt，再求出所有满足此条件的四位数平均值pjz1，以及不满足此条件的四位数平均值pjz2，最后调用写函数把结果输出到OUT.DAT文件。

例如：6712,6+2=7+1，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。 8129,8+9<>1+2,则该数不满足条件计算平均值pjz2. 注意：部分源程序已给出。

程序中已定义数组：a[300]，已定义变量：cnt

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

void jsValue() /*标准答案*/ {int I,n=0,thou,hun,ten,data; for(I=0;I<300;I++)

{thou=a[I]/1000; hun=a[I]%1000/100; ten=a[I]%100/10; data=a[I]%10; if (thou+data==hun+ten) {cnt++;pjz1+=a[I];} else {n++;pjz2+=a[I];} }

pjz1/=cnt; pjz2/=n; }

题目88：函数READDAT（）实现从文件IN.DAT中读取一篇英文文章存入到字符串数组XX中;请编制函数SORTCHARA(),其函数功能是:以行为单位对字符按从小到大的顺序进行排序,排序后的结果仍按行重新存入字符串数组XX中,最后调用函数WRITEDAT()把结果XX输出到文件OUT1.DAT . 例:原文:dAe,BfC.

CCbbAA 结果:,.ABCdef AACCbb

原始数据文件存放的格式是: 每行的宽度均小于80个字符, 含标点符号和空格。注意: 部分源程序存放在PROG1.C中。

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

类型：字符串（单词）的倒置和删除。答案：

void ConvertCharA(void)/*标准答案*/ {int I,j,k,strl; char ch;

for(I=0;Ixx[I][k]) {ch=xx[I][j];

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

题目89：已知数据文件IN.DAT中存有200个四位数, 并已调用读函数readDat()把这些数存入数组a中,请考生编制一函数jsVal(),其功能是:若一个四位数的千位数字上的值加上个位数字上的值等于百位数字上的值加上十位数字上的值，并且此四位数是奇数，则统计出满足此条件的个数cnt, 并把这些四位数按从小到大的顺序存入数组b中。最后main()函数调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。注意: 部分源程序存在文件PROG1.C文件中。

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

if ((thou+data==hun+ten)&&a[I]%2==1) {b[cnt]=a[I];cnt++;} }

for(I=0;Ib[j])

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

题目90：下列程序的功能是：将一正整数序列{K1,K2,...,K9}重新排列成一个新的序列。新序列中，比K1小的数都在K1的左面(后继的再向U左存放)，比K1大的数都在K1的右面(后续的再向右存放)，从k1想右扫描。要求编写函数jsvalue()实现此功能，最后调用writeDat()函数所新序列输出到文件out.dat中。

说明：在程序中已给出了10个序列，每个序列有9个正整数，并存入数组a[10][9]中，分别求出这10个新序列。

例：序列{6,8,9,1,2,5,4,7,3} 经重排后成为{3,4,5,2,1,6,8,9,7} 注意：部分源程序已给出。

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

jsValue(int a[10][9]) /*标准答案*/ {int value,I,j,k,num; for(I=0;I<10;I++) {value=a[I][0]; for(j=0;j<9;j++) if (a[I][j]for(k=j;k>0;k--) {num=a[I][j]; for(k=j;k>0;k--) a[I][k]=a[I][k-1]; a[I][0]=num; } }} }

题目91：请编制程序，从文件in.dat中读取200个整数至数组xx中，求出奇数的个数cnt1和偶数的个数cnt2以及数组xx值为偶数的元素值的算术平均值pj（保留2位小数）。

结果cnt1,cnt2,pj输出到out.dat中。部分程序、读数据函数read_dat(int xx[200])及输出格式已给出。

--------------------

for(I=0,j=0,cnt1=0,cnt2=0;Ifor (i=0, j=0, cnt1=0, cnt2=0; iif (xx[i]%2) cnt1++; else

cnt2++; if (i%2 == 0) j += xx[i]; }

pj = (float)j/(N/2); -----------------

题目92：请编制程序，从文件in.dat中读取200个整数至数组xx中，求出最大数max及最大数的个数cnt和数组xx中值能被3整除或能被7整除的算求增均值pj(保留2位小数)。结果cnt1,cnt2,pj输出到out.dat中。

部分程序、读数据函数read_dat(int xx[200])及输出格式已给出。 --------------------

max=xx[0]; /*标准答案*/

/****************************************** max = xx[0];

for (i=1, k=0; iif (xx[i] > max) max = xx[i];

if (xx[i]%3==0 || xx[i]%7==0) {

j += xx[i]; k++; } }

for (i=0, cnt=0; ipj = (float)(j*100/k)/100;

/****************************************** 改动在横线之间}

题目93：请编制函数ReadDat()实现从文件IN.DAT中读取1000个十进制整数到数组xx中；再编制函数COMPUTE()分别计算出XX中奇数的个数ODD,偶数的个数EVEN,平均值AVER以及方差TOTFE的值,最后调用函数WriteDat()把结果输出到OUT.DAT文件中。计算方差的公式如下：totfc=1/N∑(xx[i]-ave1)2

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

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

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

请勿改动主函数main()和输出数据函数writeDat()的内容。 ------------------------------ int ReadDat(void) /*标准答案*/ int ReadDat(void) {

FILE *fp; int i, j;

if ((fp = fopen(\"IN.DAT\ return 1;

for (i=0; i<100; i++) {

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

fscanf(fp, \"%d,\ fscanf(fp, \"\\n\"); if (feof(fp)) break; }

fclose(fp); return 0; }

void Compute(void) {

int i;

for (i=0; i<1000; i++) {

if (xx[i]%2) odd++; else

even++;

aver = aver+xx[i]; }

aver /= MAX;

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

totfc += (xx[i]-aver)*(xx[i]-aver)/MAX; }

题目94：请编制程序，从文件in.dat中读取200个整数至数组xx中，求出奇数的个数cnt1和偶数的个数cnt2以及数组xx值为偶数的元素值的算术平均值pj（保留2位小数）。

结果cnt1,cnt2,pj输出到out.dat中。部分程序、读数据函数read_dat(int xx[200])及输出格式已给出。

--------------------

for(I=0,j=0,cnt1=0,cnt2=0;Ifor (i=0; iif (xx[i]%2) cnt1++; else

cnt2++; if (i%2) {

k += xx[i]; j++; } }

pj = (float)k/j;

----------------------------

题目95：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS4.DAT中。替代关系：f(p)=p*13 mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果计算后f(p)值小于等于32或其ASCII值是偶数，则该字符不变，否则将f(p)所对应的字符进行替代。

for(I=0;Iwhile(*pf!=0)

{if((*pf*11%256>='A'&&*pf*11%256<='Z')||*pf*11%256<=32) {pf++;continue;} *pf=*pf*11%256; pf++; } } }

题目96：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS8.DAT中。替代关系：f(p)=p*11 mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果原字符是小写字母或计算后f(p)值小于等于32，则该字符不变，否则将f(p)所对应的字符进行替代。

for(I=0;Iwhile(*pf!=0)

{if((*pf>='a'&&*pf<='z')||*pf*11%256<=32) {pf++;continue;} *pf=*pf*11%256; pf++;} } }

题目97：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS8.DAT中。替代关系：f(p)=p*11mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果原字符是数字字符0至9或计算后f(p)值小于等于32，则该字符不变，否则将f(p)所对应的字符进行替代。

void encryptChar() /*标准答案*/ {int I; char *pf;

for(I=0;Iwhile(*pf!=0)

{if((*pf>='0'&&*pf<='9')||*pf*11%256<=32) {pf++;continue;} *pf=*pf*11%256; pf++; } } }

题目98：函数ReadDat()实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar()，按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat()把结果xx输出到文件PS3.DAT中。替代关系：f(p)=p*17mod 256 (p是数组中某一个字符的ASCII值，f(p)是计算后新字符的ASCII值)，如果计算后f(p)值小于等于32或其ASCII值是奇数，则该字符不变，否则将f(p)所对应的字符进行替代。

void encryptChar() /*标准答案，有问题!!!*/ { int i;

char *pf;

for (i=0; ipf = xx[i];

while (*pf != 0) {

if (((*pf*17%256)%2 != 0) || *pf*17%256<=32) {

pf++;

continue; }

*pf = *pf*17%256; pf++; } } }

题目99：已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)四部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按金额从小到大进行排列, 若金额相等, 则按产品代码从小到大进行排列最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT1.DAT中。

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

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

void SortDat() /*标准答案*/ {int I,j; PRO xy;

for(I=0;I<99;I++) for(j=I+1;j<100;j++)

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

{xy=sell[I];sell [I]=sell[j];sell[j]=xy;} else if(sell[I].je==sell[j].je)

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

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

题目100：函数READDAT（）实现从文件IN.DAT中读取一篇英文文章存入到字符串数组XX中;请编制函数CHA(),其函数功能是:以行为单位把字符串中的最后一个字符的ASCII值右移4位后加最后第二个字符的ASCII值，得到最后一个新的字符，最后第二个字符的ASCII值右移4位后加最后第三个字符的ASCII值，得到最后第二个新的字符，依此类推一直处理到第二个字符，第一个字符的ASCII值加原最后一个字符的ASCII值，得到第一个新的字符，得到的新字符分别存放在原字符串对应的位置上。最后已处理的字符串仍按行重新存入字符串数组xx中，最后调用函数writeDat()把结果xx输出到文件OUT10.DAT中。原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。

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

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

void CharConvA(void) /*标准答案*/ { int i,j; char p,c;

for(i=0;i{ p=xx[i][strlen(xx[i])-1]; c=xx[i][0];

for(j=strlen(xx[i])-1;j>0;j--) xx[i][j]=(xx[i][j]>>4)+xx[i][j-1]; xx[i][0]=p+c; } }

因篇幅问题不能全部显示，请点此查看更多更全内容

查看全文