VB南开100题.docx
《VB南开100题.docx》由会员分享，可在线阅读，更多相关《VB南开100题.docx（97页珍藏版）》请在冰豆网上搜索。
VB南开100题
题目1请编写一个函数jsValue（intm,intk,intxx[]），该函数的功能是：
将大于整数m且紧靠m的k个素数存入数组xx传回。
最后调用函数writeDat（）读取10组数据，分别得出结果且把结果输出到文件out.dat中。
部分源程序存在文件prog1.c中。
例如：
若输入175则应输出：
19，23，29，31，37。
请勿改动主函数main（）和写函数writeDat（）的内容。
intisP（intm）
{
inti;
for（i=2;iif（m%i==0）return0;
return1;
}
voidnum（intm,intk,intxx[]）
{ints=0;
for（m=m+1;k>0;m++）
if（isP（m））{xx[s++]=m;k--;}
}
无忧id14题（无isP（）函数）
#include
voidjsValue（intm,intk,intxx[]）
{inti,j,s=0;
for（i=m+1;k>0;i++）
{for（j=2;jif（i%j==0）break;
if（i==j）{xx[s++]=i;k--;}
}
★题目2（无忧id143整数排序题）
已知数据文件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（）的内容。
voidjsVal（）
{inti,j,qw,bw,sw,gw;
for（i=0;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;ifor（j=i+1;jif（b[i]}
★☆题目3（无忧id133题；捷成id59、99字符串位置倒置题）
函数ReadDat（）实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中；请编制函数StrOR（），其函数的功能是：
以行为单位依次把字符串中所有小写字母o左边的字符串内容移到该串的右边存放，然后把小写字母o删除，余下的字符串内容移到已处理字符串的左边存放，之后把已处理的字符串仍按行重新存入字符串数组xx中。
最后main（）函数调用函数WriteDat（）把结果xx输出到文件OUT5.DAT中。
例如：
原文：
nanyfield.Yucancreateanindex
youhavethecorrectrecord.
结果：
nanyfield.Yucancreateanindex
rd.yuhavethecrrectrec
原始数据文件存放的格式是：
每行的宽度均小于80个字符，含标点符号和空格。
注意：
部分源程序存放在文件prog1.c中。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数WriteDat（）的内容。
voidStrOR（void）
{inti,righto,j,s,k;
chartem[80];
for（i=0;ifor（j=strlen（xx[i]）-1;j>=0;j--）
{k=0;
memset（tem,0,80）;/*初始化字符串数组tem*/
if（xx[i][j]=='o'） /*如果当前字符为'o'，进入以下语句*/
{righto=j;/*则将此字符中位置j的值赋给righto*/
for（s=righto+1;stem[k++]=xx[i][s];/*从righto的下一跳开始将其后所有的字符都存入到tem中*/
for（s=0;sif（xx[i][s]!
='o'）tem[k++]=xx[i][s];/*将不是字符'o'的字符全存入到tem中*/
strcpy（xx[i],tem）;/*将当前已处理的字符重新存入当前行xx*/
}
elsecontinue;
}
}
功能：
将字符串src中前maxlen个字符连接到dest中
相关头文件：
string.h
char*strcpy（char*dest,constchar*src）
功能：
将字符串src拷贝到字符串dest中去
相关头文件：
string.h
★☆题目4（无忧id24题捷成id9字符串单词倒置题）
函数ReadDat（）实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中，请编制函数StrOL（），其函数的功能是：
以行为单位对行中以空格或标点符号为分隔的所有单词进行倒排。
最后把已处理的字符串（应不含标点符号）仍按行重新存入字符串数组xx中，最后调用函数writeDat（）把结果xx输出到文件OUT6.DAT中。
例如：
原文：
YouHeMe
Iamastudent.
结果：
MeHeYou
studentaamI
原始数据文件存放的格式是：
每行的宽度均小于80个字符，含标点符号和空格。
部分源程序存在文件prog1.c中。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数writeDat（）的内容。
/*在无忧及捷成版模拟系统中都通过测试（输入文件句末有标点的在输出文件中句前有空格*/
voidStrOL（void）
{inti,j,k,s,m,strl;
charstr[80];
for（i=0;i{strl=strlen（xx[i]）;
memset（str,0,80）;/*初始化这字符串数组str*/
s=k=0;
for（j=strl-1;j>=0;j--）/*从当前字符串尾部开始向前倒序循环,实现题意要求的倒排*/
{if（isalpha（xx[i][j]））k++;/*如果当前字符是字母a~z或A~Z，则k加一*/
else{for（m=1;m<=k;m++）/*否则将长度为k的单词顺序存入到字符串数组str中,s值加1*/
str[s++]=xx[i][j+m];
k=0;/*将k值清0，以方便下一个单词的长度计数*/
}
if（!
isalpha（xx[i][j]））str[s++]='';/*如果当前字符不是字母a~z或A~Z,则以空格代之存入到字符串数组str中,s值加一*/
}
for（m=1;m<=k;m++）/*此时的k值为当前字符串中第一个单词的长度,但在上一个for循环中没能存入到字符串数组str中,所以在这里将其存入到str中*/
str[s++]=xx[i][j+m];
str[s]='\0';/*在当前行尾加0以标记此行的结束*/
strcpy（xx[i],str）;/*将倒排好的当前字符串重新存回到当前行xx中*/
}
}
捷成版模拟系统中的解法
/*在无忧模拟系统中没通过测试（输入文件句末有标点的在输出文件中句前无空格*/
voidStrOL（void）
{
inti,j;
charword[21],yy[80],zz[80],*p;
for（i=0;ip=xx[i];
j=0;
memset（word,0,21）;
memset（yy,0,80）;
while（*p）{
if（isalpha（*p））{
word[j++]=*p++;
if（*p）continue;
}
strcpy（zz,yy）;
sprintf（yy,"%s%s",word,zz）;
j=0;
memset（word,0,21）;
while（*p&&（!
isalpha（*p）））p++;
}
strcpy（xx[i],yy）;
}
}
另一解法（）:
/*在无忧及捷成版模拟系统中都通过测试（输入文件句末有标点的在输出文件中句前有空格*/
voidStrOL（void）
{inti,j,m;
charstr[80];
for（i=0;i {m=strlen（xx[i]）;
memset（str,0,80）;
for（j=m-1;j>=0;j--）
if（!
isalpha（xx[i][j]））
{strcat（str,xx[i]+j+1）;
strcat（str,""）;
xx[i][j]='\0';
}
strcat（str,xx[i]）;
strcpy（xx[i],str）;
}
}
实际上机考试时上面几种解法都可以采用。
*****************************************
★☆题目5（无忧id8整数排序题）
在文件in.dat中有200个正整数，且每个数均在1000至9999之间。
函数ReadDat（）读取这200个数存放到数组aa中。
请编制函数jsSort（），其函数的功能是：
要求按每个数的后三位的大小进行升序排列，然后取出满足此条件的前10个数依次存入数组bb中，如果后三位的数值相等，则按原先的数值进行降序排列。
最后调用函数WriteDat（）把结果bb输出到文件out.dat中。
例：
处理前60125099901270258088
处理后90126012702580885099
部分源程序存在文件prog1.c中。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数WriteDat（）的内容。
voidjsSort（）
{
inti,j,data;
for（i=0;i<199;i++）
for（j=i+1;j<200;j++）
if（aa[i]%1000>aa[j]%1000||aa[i]%1000==aa[j]%1000&&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中。
例：
处理前90125099601270258088
处理后50998088702560129012
注意：
部分源程序已给出。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数WriteDat（）的内容。
voidjsSort（）
{
inti,j,data;
for（i=0;i<199;i++）
for（j=i+1;j<200;j++）
if（aa[i]%1000aa[j]）
{data=aa[i];aa[i]=aa[j];aa[j]=data;}
for（i=0;i<10;i++）
bb[i]=aa[i];
}
*****************************************
★题目7（无忧id15结构体操作题））
已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm（字符型4位），产品名称mc（字符型10位），单价dj（整型），数量sl（整型），金额je（长整型）五部分组成。
其中：
金额=单价*数量计算得出。
函数ReadDat（）是读取这100个销售记录并存入结构数组sell中。
请编制函数SortDat（），其功能要求：
按产品代码从大到小进行排列，若产品代码相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat（）把结果输出到文件OUT6.DAT中。
部分源程序存在文件prog1.c中。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数WriteDat（）的内容
voidSortDat（）
{inti,j;
PROxy;
for（i=0;i<99;i++）
for（j=i+1;j<100;j++）
if（strcmp（sell[i].dm,sell[j].dm）<0||strcmp（sell[i].dm,sell[j].dm）==0&&sell[i].je{xy=sell[i];sell[i]=sell[j];sell[j]=xy;}
}
*****************************************
★☆题目8（无忧id83字符替换题）
函数ReadDat（）实现从文件ENG.IN中读取一篇英文文章，存入到字符串数组xx中；请编制函数encryptChar（），按给定的替代关系对数组xx中的所有字符进行替代，仍存入数组xx的对应的位置上，最后调用函数WriteDat（）把结果xx输出到文件PS1.DAT中。
替代关系：
f（p）=p*11mod256（p是数组中某一个字符的ASCII值，f（p）是计算后新字符的ASCII值），如果计算后f（p）值小于等于32或大于130，则该字符不变，否则将f（p）所对应的字符进行替代。
部分源程序存在文件prog1.c中。
原始数据文件存放的格式是：
每行的宽度均小于80个字符。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数WriteDat（）的内容。
voidencryptChar（）
{inti,j;
for（i=0;ifor（j=0;jif（xx[i][j]*11%256<=32||xx[i][j]*11%256>130）continue;
elsexx[i][j]=xx[i][j]*11%256;
}
***********************************
★☆题目9（无忧id28；id124；捷成id16字符串排序题）
函数ReadDat（）实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中，请编制函数SortCharD（），其函数的功能是：
以行为单位对字符按从大到小的顺序进行排序，排序后的结果仍按行重新存入字符串数组xx中，最后调用函数writeDat（）把结果xx输出到文件OUT2.DAT中。
例：
原文：
dAe,BfC.
CCbbAA
结果：
fedCBA.
bbCCAA
原始数据文件存放的格式是：
每行的宽度均小于80个字符，含标点符号和空格。
部分源程序存在文件prog1.c中。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数writeDat（）的内容。
voidSortCharD（void）
{inti,j,k,strl;
charch;
for（i=0;i{strl=strlen（xx[i]）;
for（j=0;jfor（k=j+1;kif（xx[i][j]{ch=xx[i][j];xx[i][j]=xx[i][k];xx[i][k]=ch;}
}
}
*****************************************
题目10（无忧id68替换字符题）
函数ReadDat（）实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中，请编制函数ConvertCharA（），其函数的功能是：
以行为单位把字符串中的所有小写字母改写成该字母的下一个字母，如果是字母z，则改写成字母a。
大写字母仍为大写字母，小写字母仍为小写字母，其他字符不变。
把已处理的字符串仍按行重新存入字符串数组xx中，最后调用函数writeDat（）把结果xx输出到文件OUT1.DAT中。
例：
原文：
Adb.Bcdza
abck.LLhj
结果：
Aec.Bdeab
bcdl.LLik
原始数据文件存放的格式是：
每行的宽度均小于80个字符，含标点符号和空格。
部分源程序存在文件prog1.c中。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数writeDat（）的内容。
voidConvertCharA（void）
{inti,j;
for（i=0;i{for（j=0;jif（xx[i][j]=='z'）xx[i][j]='a';
elseif（xx[i][j]>='a'&&xx[i][j]<='y'）xx[i][j]+=1;
}
}
*****************************************
☆题目11（无忧id93字符串字母移位题）
程序prog1.c的功能是：
把s字符串中的所有字母改写成该字母的下一个字母，字母z改写成字母a。
要求大写字母仍为大写字母，小写字母仍为小写字母，其它字符不做改变。
请考生编写函数chg（char*s）实现程序要求，最后调用函数readwriteDAT（）把结果输出到文件bc1.out中。
例如：
s字符串中原有的内容为：
Mn.123Zxy，则调用该函数后，结果为：
No.123Ayz。
注意：
部分源程序存在文件prog1.c文件中。
请勿改动主函数main（）和输出数据函数
voidchg（char*s）
{while（*s）
if（*s=='z'||*s=='Z'）{*s-=25;s++;}
elseif（*s>='a'&&*s<='y'）{*s+=1;s++;}
elseif（*s>='A'&&*s<='Y'）{*s+=1;s++;}
elses++;
}
*****************************************
★题目12（无忧id78结构体运算题题）
已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm（字符型4位），产品名称mc（字符型10位），单价dj（整型），数量sl（整型），金额je（长整型）五部分组成。
其中：
金额=单价*数量计算得出。
函数ReadDat（）是读取这100个销售记录并存入结构数组sell中。
请编制函数SortDat（），其功能要求：
按产品名称从小到大进行排列，若产品名称相等，则按金额从小到大进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat（）把结果输出到文件OUT5.DAT中。
部分源程序存在文件prog1.c中。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数WriteDat（）的内容。
voidSortDat（）
{inti,j;
PROxy;
for（i=0;i<99;i++）
for（j=i+1;j<100;j++）
if（strcmp（sell[i].mc,sell[j].mc）>0||strcmp（sell[i].mc,sell[j].mc）==0&&sell[i].je>sell[j].je）
{xy=sell[i];sell[i]=sell[j];sell[j]=xy;}
}
*****************************************
题目13（无忧id81结构体运算题）
无忧id81题按金额从小到大进行排列
已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm（字符型4位），产品名称mc（字符型10位），单价dj（整型），数量sl（整型），金额je（长整型）五部分组成。
其中：
金额=单价*数量计算得出。
函数ReadDat（）是读取这100个销售记录并存入结构数组sell中。
请编制函数SortDat（），其功能
要求：
按产品代码从小到大进行排列，若产品代码相等，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat（）把结果输出到文件OUT9.DAT中。
部分源程序存在文件prog1.c中。
请勿改动主函数main（）、读数据函数ReadDat（）和输出数据函数WriteDat（）的内容。
voidSortDat（）
{inti,j;
PROxy;
for（i=0;i<99;i++）
for（j=i+1;j<100;j++）
if（strcmp（sell[i].dm,sell[j].dm）>0||strcmp（sell[i].dm,sell[j].dm）==0&&sell[i].je{xy=sell[i];sell[i]=sell[j];sell[j]=xy;}
}
*****************************************
☆题目14（无忧id151整数统计排序题）
已知数据文件IN.DAT中存有200个四位数，并已调用读函数readDat（）把这些数存入数组a中，请考生编制一函数jsVal（），其功能是：
依次从数组a中取出一个四位数，如果该四位数连续大于该四位数以后的五个数且
升级会员 