三级上机题资料1

if(b[j]

{t=b[j];b[j]=b[j+1];b[j+1]=t;} 运行结果： 12

9892 9880 9848 9750 9498 9102 9068 9066 8970 8704 8448 7996

17． 每行字函数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 部分源程序存在文件prog1.c中。

请勿改动主函数main()、读函数ReadDat()和写函数 WriteDat()的内容. /*参考答案*/

int len,i,j,k,t; for(i=0;i<20;i++) { len=strlen(xx[i]);

for(j=0;j

for(k=0;kxx[i][k+1])

{t=xx[i][k];xx[i][k]=xx[i][k+1];xx[i][k+1]=t;} }

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

for(j=len/2-1,k=len-1;j>=0;j--,k--) {t=xx[i][j];xx[i][j]=xx[i][k];xx[i][k]=t;} }

运行结果： hgfeabcd 876591234

eld, on several fields to be used Yaaaaccdeeefiinnnnnoortuxy at you want to use as a key. Theh ,,aeeeefghhnooooprrrrsttttt

ess to specific records and definec aaccdeeeiiikkllnnooqssuuwxyy f a ISAM file. After you no longer acdeeeefgiilnnoooopqrrrrsssstu ddition and indexes have no effectA ,.aacdddeeeeeeiilnnnnottuxy or on other indexes. aacddeehnoorrstt

ch record to uniquely identify that Yaaaaddeeeffiiiillmnnnotuwy he file. For example, the Employee accddeeefhillmnoooorrrrrrstt not assign the same number to two Nbddeeeffiiiilmnooqrsuuuuy r reassign these numbers to other ,addeeeeeeeffilmnnnooprstuvyy modify the record belonging to a .Ideeeffhiilmnooooprsstuwyy d saves the thouble of determining. ,cceeeeeeffhiiiiillmnoppqsstuuy

must search again to find others. ,Icceeefhiinnoooorrsttttuy e field within your records, youu Iaaaefhhiknnoooqttuuuvwyy scription, and ISAM will allow only aacccddeeeefhhiiiklnnnstttuy ecify that the employee numbers are ,.Faeeeefiiklmnooppqrssuuuxyy cords to the file for, or changee ,AIMSaddeeillnnooqrstuuuyy do not alreadly exist int file.t ,abbeeeeehlmmmnnooprrssttuuy

18． 函数ReadDat()实现从文件IN.DAT中读取一篇英文文章存入到字符串数组xx中，请编制函数StrCharJL()，其函数的功能是：以行为单位把字符串中的所有字符的ASCII值左移4位，如果左移后，其字符的ASCII值小于等于32或大于100，则原字符保持不变，否则就把左移后的字符ASCII值再加上原字符ASCII值，得到新的字符仍存入原字符串对应的位置上。最后把已处理的字符串仍按行重新存入字符串数组xx中，最后调用函数writeDat()把结果xx输出到文件OUT7.DAT中。

原始数据文件存放的格式是：每行的宽度均小于80个字符，含标点符号和空格。 部分源程序存在文件prog1.c中。

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数writeDat()的内容。 /*参考答案*/

int i,j; char x,y;

for(i=0;i

for(j=0;j

if((y<=32)||(y>100)) ; else xx[i][j]=(x+y); } 运行结果：

Yo?揳n 搑礱吹 an inさx on any 苅祃? on ５值ral 苅祃ぃ 磑 b?牛丹 磑g荡h祌, or on par矗 磆祌祇? 磆a?yo?wan?磑 牛?a?a k祔. 攈?

k祔?in inさx担 allow yo?q舏搆 a摀担?磑 �d祿i苅?r祿orぃ an?さ苅n? orさr?苚r ５q诺n磇al pro摰＃ing o?a I傾M 苅l? A拼祌 yo?no long祌 n档?an inさx, yo?揳n さl荡?i? Aいi磇on an?inさx担 ha值 no 灯频摯 on 磆?�d碼 r祿orぃ or on o磆祌 inさx担.

Yo?may wan?a 苅祃?in 苅祃?in 礱揾 r祿or?磑 舗iq诺ly iさn磇苰 磆a? r祿or?苧om all o磆祌 r祿orぃ in 磆?苅l? �dr 祒ampl? 磆?昺ploy档 N舖b祌 苅祃?i?舗iq诺 i?yo?�d no?a＃ign 磆?�dm?n舖b祌 磑 磜o �d破祌祅?祄ploy档? an?yo?n抵祌 r礱＃ign 磆担?n舖b祌?磑 o磆祌 祄ploy档? I?yo?wi�d 磑 苅n?or mo�d苰 磆?r祿or?b祃onging 磑 a �d祿i苅?祄ploy档, 磆i?舗iq诺 苅祃?�d值?磆?磆o舃l?o?さ吹rmining wh荡h祌 yo?ha值 磆?搊rr祿?r祿or?

I?yo?�d no?ha值 a 舗iq诺 苅祃? yo?m牛?苅n?磆?苅r４ r祿or?

磆?ma磽h担 yo舝 k祔 an?さ吹rmin?wh荡h祌 磆?r祿or?i?磆?on?yo? wan? I?i?i?no?磆?搊rr祿?on? yo?m牛?５ar揾 again 磑 苅n?o磆祌? I?yo?know 磆a?yo?ha值 a 舗iq诺 苅祃?wi磆in yo舝 r祿orぃ, yo? 揳n in搇扭?磆i?芶摯 in 磆?k祔 さ�drip磇on, an?I傾M will allow only 舗iq诺 k祔? �dr 祒ampl? i?yo?�d祿i苰 磆a?磆?祄ploy档 n舖b祌?ar? 舗iq诺, I傾M only l荡?yo?aい r祿orぃ 磑 磆?苅l?苚r, or 揾ang?

n舖b祌?磑, 祄ploy档 n舖b祌?磆a?�d no?alr礱�dy 祒i４ in?苅l?

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

请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容 /*参考答案*/

int i,j,k,t;

for(i=0;i<199;i++) for(j=0;j<199;j++)

if(aa[j]00>aa[j+1]00||aa[j]00==aa[j+1]00&&aa[j]

20． 已知数据文件in.dat中存有N个实数，函数ReadDat()是读取这N个实数存入数组xx中。请编制一函数CalValue()，其功能是：1. 求出所有这N个实数的平均值aver;2.分别求出这N个实数的整数部分值之和sumint以及其小数部分值之和sumdec, 最后调用写函数writeDat()把所求的结果输出到out.dat文件。

例如：5591是素数，则该数满足条件计算平均值pjz1，且个数cnt=cnt+1。 9812是非素数，则该数不满足条件计算平均值pjz2。 部分源程序存在文件prog1.c中。

请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容。 /*参考答案*/

int i;double sum=0.0; for(i=0;i

sumint+= (int)xx[i];

sumdec+=xx[i]-(int)xx[i]; } aver=sum/N; 运行结果：

150 475.84 71306.00 69.82

21. 请编制函数ReadDat()实现从文件IN.DAT中读取1000个十进制整数到数组xx中；请编制函数Compute()分别计算出xx中偶数的个数even，奇数的平均值ave1，偶数的平均值ave2以及方差totfc的值，最后调用函数WriteDat()把结果输出到OUT.DAT文件 中。

计算方差的公式如下：

N 2 totfc=1/N∑(xx[i]-ave2) i=1

设N为偶数的个数，xx[i]为偶数，ave2为偶数的平均值。

原始数据文件存放的格式是：每行存放10个数，并用逗号隔开。（每个数均大于0且小于等于2000） 部分源程序存在文件prog1.c中。

请勿改动主函数main()和输出数据函数writeDat()的内容。 /*参考答案*/

int m,old=0;

for (m=0;m

{even++;ave2+=xx[m];} else{ave1+=xx[m];old++;} ave2/=even; ave1/=old;

for (m=0;m

totfc+=(xx[m]-ave2)*(xx[m]-ave2); totfc/=even;

运行结果： 499

1009.491018 988.893788 327569.165072

22. 已知数据文件in.dat中存有300个四位数，并已调用读函数ReadDat()把这些数存入数组a中，请编制一函数jsValue()，其功能是：求出个位数上的数减千位数上的数减百位数上的数减十位数上的数大于零的个数cnt，再把所有满足此条件的四位数依次存入数组b中，然后对数组b的四位数按从大到小的顺序进行排序，最后调用写函数writeDat()把结果输出到out.dat文件。 例如：1239，9-1-2-3>0，则该数满足条件存入数组b中，且个数cnt=cnt+1。 8129，9-8-1-2<0，

则该数不满足条件忽略。

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

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

请勿改动主函数main()、读函数ReadDat()和写函数writeDat()的内容 /*参考答案*/

int i,j,t;