蓝色部分为解题答案
题目前加☆为2005年4月份根据给大论坛考生反馈的题号集中而来
题目前加★为2005年9月上机考试试题，题中难免有题型相同而题号增加的现象，此类标注仅供参考。
个别南开题如57，100与书中有所不同，是按实际考试的题目而来，并对今年在实际上机出现的考题，用红色字体表示实际上机题中的注意事项。
******************************************************************************
题目60（整数运算排序题）
在文件in.dat中有200组数据，每组有3个数，每个数均是三位数。函数ReadDat()读取这200组数据存放到结构数组aa中，请编制函数jsSort()，其函数的功能是：要求在200组数据中找出条件为每组中的第二个数大于第一个数加第三个数的之和，其中满足条件的组数作为函数jsSort() 的返回值，同时把满足条件的数据存入结构数组bb中，再对bb中的数据按照每组数据的第二个数加第三个之和的大小进行降序排列（第二个数加第三个数的和均不相等），排序后的结果仍重新存入结构数组bb中，最后调用函数WriteDat()把结果bb输出到文件out.dat中。
部分源程序存在文件prog1.c中。
请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。
int jsSort()
{int i, j, cnt=0;
data ch;
for(i=0;i<200;i++)
if(aa[i].x2>aa[i].x1+aa[i].x3) bb[cnt++]=aa[i];
for(i=0;i<cnt-1;i++)
for(j=i+1;j<cnt;j++)
if(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||sell[i].je==sell[j].je&&strcmp(sell[i].dm,sell[j].dm)<0)
{xy=sell[i]; sell[i]=sell[j]; sell[j]=xy;}
}
*****************************************************************************
☆题目62（字符替换题）
无忧id 9 题条件微有不同
函数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)所对应的字符进行替代。
部分源程序存在文件prog1.c中。原始数据文件存放的格式是：每行的宽度均小于80个字符。
请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。
void encryptChar()
{ int i,j;
for(i=0;i<maxline;i++)
for(j=0;j<strlen(xx[i]);j++)
if(xx[i][j]*13%256<=32||(xx[i][j]*13%256)%2==0) continue;
else xx[i][j]=xx[i][j]*13%256;
}
*****************************************************************************
★题目63（字符串移位题）
程序prog1.c的功能是：把 s 字符串中的所有字符左移一个位置，串中的第一个字符移到最后。请考生编写函数chg(char *s)实现程序要求，最后调用函数readwriteDAT( )把结果输出到bc2.out文件中。
例如：s字符串中原有内容为：Mn.123xyZ，则调用该函数后，结果为：n.123xyZM。
注意：部分源程序存在文件prog1.c文件中。
请勿改动主函数main( )和输出数据函数readwriteDAT()的内容。
#include <conio.h>
#include <stdio.h>
#define N 81
void readwriteDAT();
void chg(char *s)
{ int i;
char ch=*s;
for(i=0;i<strlen(s)-1;i++)
s[i]=s[i+1];
s[strlen(s)-1]=ch;
}
************************************************************************
★☆题目64（素数题）
下列程序的功能是：找出所有100以内（含100）满足I，I+4，I+10都是素数的整数I（I+10也在100以内）的个数cnt以及这些I之和sum。请编写函数countValue()实现程序要求的功能，最后调用函数writeDat()把结果cnt和sum输出到文件out.dat中。
部分源程序存在文件prog1.c中。
请勿改动主函数main()和输出数据函数writeDat()的内容。
int isPrime(int m)
{
int i;
for(i=2; i<m; i++)
if(m % i ==0) return 0 ;
return 1;
}
void countValue()
{int i;
for(i=2;i<=90;i++)
if(isPrime(i)&&isPrime(i+4)&&isPrime(i+10))
{cnt++;sum+=i;}
}
运行结果为：
满足条件的整数的个数＝7
满足条件的整数的和值＝201
*************************************************************************
☆题目65（整数统计运算题）
已知在文件IN.DAT中存有若干个（个数<200）四位数字的正整数，函数ReadDat()读取这若干个正整数并存入数组xx中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；2、求这些数中的各位数字之和是奇数的数的个数totCnt，以及满足此条件的这些数的算术平均值totPjz，最后调用函数writeDat()把所求的结果输出到文件OUT.DAT中。
部分源程序存在文件prog1.c中。
请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。
void CalValue(void)
{ int i ,qw,bw,sw,gw;
for(i=0;i<MAXNUM;i++)
if(xx[i]>0)
{ totNum++;
qw=xx[i]/1000; bw=xx[i]/100%10;
sw=xx[i]%100/10; gw=xx[i]%10;
if((qw+bw+sw+gw)%2) { totCnt++; totPjz+=xx[i];}
}
if(totCnt==0) totPjz=0;
else totPjz/=totCnt;
}
**************************************************************************
★题目66（素数题）
下列程序prog1.c的功能是：计算500-800区间内素数的个数cnt，并按所求素数的值从大到小的顺序，再计算其间隔加、减之和，即第1个素数-第2个素数+第3个素数-第4个素数+第5个素数...的值sum。请编写函数countValue()实现程序的要求，最后调用函数writeDat()把结果cnt和sum，输出到文件OUT11.DAT中。
部分源程序已给出。
请勿改动主函数main()和输出数据函数writeDat()的内容。
int isP(int m)
{ int i;
for(i=2;i<m;i++)
if(m % i==0)return 0;
return 1;
}
void countValue()
{int i,j,k=1;
for(i=800;i>500;i--)
if(isP(i))
{
cnt++;
sum=sum+k*i;
k=k*(-1); }
}
}
***********************************************************************
题目67（整数各位数字运算题）
下列程序的功能是：选出5000以下符合条件的自然数。条件是：千位数字与百位数字之和等于十位数字与个位数字之和，且千位数字与百位数字之和等于个位数字与千位数字之差的10倍。计算并输出这些四位自然数的个数cnt以及这些数的和sum。请编写函数countValue()实现程序的要求，最后调用函数writeDat()把结果cnt和sum，输出到文件OUT13.DAT中。
部分源程序存在文件prog1.c中。
请勿改动主函数main()和输出数据函数writeDat()的内容。
void countValue()
{int i,thou,hun,ten,data;
for(i=1000;i<5000;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()
{int i,j,thou,hun,ten,data;
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&&thou%2&&hun%2&&ten%2&&data%2) b[cnt++]=a[i];
}
for(i=0;i<cnt-1;i++)
for(j=i+1;j<cnt;j++)
if(b[i]<b[j]) {thou=b[i]; b[i]=b[j];b[j]=thou;}
}
******************************************************************************
题目69（整数统计运算题）
已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存入数组a中，请考生编制一函数jsVal()，其功能是：把一个四位数的千位数字上的值减去百位数字上的值再减去十位数字上的值最后减去个位数字上的值，如果得出的值大于等于零且原四位数是奇数，则统计出满足此条件的个数cnt并把这些四位数按从小到大的顺序存入数组b中，最后调用写函数writeDat()把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。
注意：部分源程序存在文件prog1.c中。
程序中已定义数组：a[200]，b[200]，已定义变量：cnt
请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。
void jsVal()
{int i,j,thou,hun,ten,data;
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-hun-ten-data>=0&&a[i]%2) b[cnt++]=a[i];
}
for(i=0;i<cnt-1;i++)
for(j=i+1;j<cnt;j++)
if(b[i]>b[j]) {thou=b[i]; b[i]=b[j];b[j]=thou;}
}
**********************************************************************
题目70（整数统计运算题）
已知在文件IN.DAT中存有若干个（个数<200）四位数字的正整数，函数ReadDat()读取这若干个正整数并存入数组xx中。请编制函数CalValue()，其功能要求：1、求出这文件中共有多少个正整数totNum；2、求这些数右移1位后，产生的新数是奇数的数的个数totCnt，以及满足此条件的这些数（右移前的值）的算术平均值totPjz，最后调用函数writeDat()把所求的结果输出到文件OUT.DAT中。
部分源程序存在文件prog1.c中。
请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。
void CalValue(void)
{int i,data;
for(i=0;i<MAXNUM;i++)
if(xx[i]>0)
{ totNum++;
data=xx[i]>>1;
if(data%2){totCnt++;totPjz+=xx[i];}
}
if(totCnt==0) totPjz=0;
else 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
部分源程序存在文件prog1.c中。
请勿改动主函数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<half-1;j++)
for(k=j+1;k<half;k++)
if(xx[i][j]<xx[i][k]) { ch=xx[i][j];xx[i][j]=xx[i][k];xx[i][k]=ch;}
if(strl%2) half++;
for(j=half;j<strl-1;j++)
for(k=j+1;k<strl;k++)
if(xx[i][j]>xx[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,j,thou,hun,ten,data,ab,cd;
for(i=0;i<200;i++)
{thou=a[i]/1000; hun=a[i]/100%10;
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==0&&cd%2==0&&hun!=0&&data!=0)
{b[cnt]=a[i];cnt++;}
}
for(i=0;i<cnt-1;i++)
for(j=i+1;j<cnt;j++)
if(b[i]<b[j]) {data=b[i];b[i]=b[j];b[j]=data;}
}
***********************************************************************
★题目73（ 字符替换题）
函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中，请编制函数ConverCharD()，其函数的功能是：以行为单位把字符串中的所有小写字母改写成该字母的上一个字母，如果是字母a，则改写成字母z。大写字母仍为大写字母，小写字母仍为小写字母，其它字符不变。最后把已处理的字符串仍按行重新存入字符串数组xx中，最后调用函数writeDat()把结果xx输出到文件OUT4.DAT中。
例：原文：Adb.Bcdza
abck.LLhj
结果：Aca.Bbcyz
zabj.LLgi
原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。
部分源程序存在文件prog1.c中。
请勿改动主函数main()、读数据函数ReadDat()和输出数据函数writeDat()的内容。
void ConvertCharD(void)
{ int i,j;
for(i=0;i<maxline;i++)
{ for(j=0;j<strlen(xx[i]);j++)
if(xx[i][j]=='a') xx[i][j]='z';
else if(xx[i][j]>='b'&&xx[i][j]<='z') xx[i][j]-=1;
}
}
*********************************************************************
★题目74（字符ASCII值移位替换题）
函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中，请编制函数StrCharJL()，其函数的功能是：以行为单位把字符串中的所有字符的ASCII值左移4位,低位补0，如果左移后，其字符的ASCII值小于等于32或大于100，则原字符保持不变，否则就把左移后的字符ASCII值再加上原字符ASCII值，得到新的字符仍存入原字符串对应的位置上。最后把已处理的字符串仍按行重新存入字符串数组xx中，最后调用函数writeDat()把结果xx输出到文件OUT7.DAT中。
原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。
部分源程序存在文件prog1.c中。
请勿改动主函数main()、读数据函数ReadDat()和输出数据函数writeDat()的内容。
void StrCharJL(void)
{ int i,j;
char c;
for(i=0;i<maxline;i++)
for(j=0;j<strlen(xx[i]);j++)
{ c=xx[i][j]<<4;
if(!(c<=32||c>100)) xx[i][j]+=c;
}
}
************************************************************************
★☆题目75 （整数各位数运算及排序题）
在文件in.dat中有200组数据，每组有3个数，每个数均是三位数。函数ReadDat()读取这200组数据存放到结构数组aa中，请编制函数jsSort()，其函数的功能是：要求在200组数据中找出条件为每组中的第一个数大于第二个数加第三个数的和，其中满足条件的组数作为函数jsSort()的返回值，同时把满足条件的数据存入结构数组bb中，再对bb中的数据按照每组数据的第一个数加第三个之和的大小进行升序排列（第一个数加第三个数的和均不相等），排序后的结果仍重新存入结构数组bb中，最后调用函数writeDat()把结果bb输出到
文件out.dat中。
部分源程序存在文件prog1.c中。
请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。
int jsSort()
{ int i,j,cnt=0;
data xy;
for(i=0;i<200;i++)
if(aa[i].x1>(aa[i].x2+aa[i].x3)) bb[cnt++]=aa[i];
for(i=0;i<cnt-1;i++)
for(j=i+1;j<cnt;j++)
if(bb[i].x1+bb[i].x3>bb[j].x1+bb[j].x3) { xy=bb[i]; bb[i]=bb[j]; bb[j]=xy;}
return cnt;
}
*****************************************************************************
★题目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,j,thou,hun,ten,data,ab,cd;
for(i=0;i<MAX;i++)
{thou=a[i]/1000; hun=a[i]/100%10;
ten=a[i]%100/10; data=a[i]%10;
ab=10*data+thou; cd=10*hun+ten;
if((ab%2!=cd%2)&&((ab%17==0||cd%17==0)&&ab>=10&&cd>=10))
b[cnt++]=a[i];
}
for(i=0;i<cnt-1;i++)
for(j=i+1;j<cnt;j++)
if(b[i]<b[j]) {data=b[i];b[i]=b[j];b[j]=data;}
}
****************************************************************************
★☆题目77（整数各位运算题）
已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存入数组a中，请考生编制一函数jsVal()，其功能是：把一个四位数的千位数字上的值加上十位数字上的值恰好等于百位数字上的值加上个位数字上的值，并且原四位数是偶数，则统计出满足此条件的个数cnt并把这些四位数按从小到大的顺序存入数组b中，最后调用写函数writeDat( )把结果cnt以及数组b中符合条件的四位数输出到OUT.DAT文件中。
注意：部分源程序存在文件prog1.c中。
程序中已定义数组：a[200]，b[200]，已定义变量：cnt
请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。
void jsVal()
{int i,j,thou,hun,ten,data;
for(i=0;i<MAX;i++)
{thou=a[i]/1000; hun=a[i]/100%10;
ten=a[i]%100/10; data=a[i]%10;
if((thou+ten==hun+data)&&a[i]%2==0) b[cnt++]=a[i];
}
for(i=0;i<cnt-1;i++)
for(j=i+1;j<cnt;j++)
if(b[i]>b[j]) {thou=b[i];b[i]=b[j];b[j]=thou;}
}
****************************************************************************
★题目78（整数各位统计排序题）
已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat()把这些数存入数组a中，请考生编制一函数jsVal()，其功能是：若一个四位数的千位数字上的值大于等于百位数字上的值，百位数字上的值大于等于十位数字上的值，以及十位数字上的值大于等于个位数字上的值，并且原四位数是奇数，则统计出满足此条件的个数cnt并把这些四位数按从小到大的顺序存入数组b中，最后调用写函数writeDat()把结果cnt以及数组b中符合条件的数输出到OUT.DAT文件中。
注意：部分源程序存在文件prog1.c中。
程序中已定义数组：a[200]，b[200]，已定义变量：cnt
请勿改动数据文件IN.DAT中的任何数据、主函数main()、读函数readDat()和写函数writeDat()的内容。
void jsVal()
{int i,j,thou,hun,ten,data;
for(i=0;i<MAX;i++)
{thou=a[i]/1000; hun=a[i]/100%10;
ten=a[i]%100/10; data=a[i]%10;
if(thou>=hun&&hun>=ten&&ten>=data&&a[i]%2) b[cnt++]=a[i];
}
for(i=0;i<cnt-1;i++)
for(j=i+1;j<cnt;j++)
if(b[i]>b[j]) {thou=b[i];b[i]=b[j];b[j]=thou;}
}
***********************************************************************
★题目79（数字运算题）
请编写函数void countValue(int *a,int *n)，它的功能是：求出1到1000之内能被7或11整除但不能同时被7或11整除的所有整数放在数组a中，并通过n返回这些数的个数。
部分源程序存在文件prog1.c中。
请勿改动主函数main()和输出数据函数writeDAT()的内容。
#include <conio.h>
#include <stdio.h>
void countValue(int *a,int *n)
{ int i;
*n=0;
for(i=1;i<=1000;i++)
if(i%7==0&&i%11||i%7&&i%11==0)
a[(*n)++]=i;
}
