2009年计算机网络技术三级上机试题练习137.doc

2009年计算机网络技术三级上机试题练习137 已知数据文件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()的内容。/*参考答案*/ #include stdio.h#define MAX 200int a[MAX], b[MAX], cnt = 0 ; void jsVal(){int i,j,s1,s2;for(i=0;iMAX;i++){s1=(a[i]/1000)*10+a[i]/10%10;s2=a[i]%10*10+a[i]/100%10;if(s1-s2=0s1-s2=10s1%2s2%2s1=10s2=10)b[cnt++]=a[i];}for(i=0;icnt-1;i++)for(j=0;jcnt-1;j++)if(b[j]=b[j+1]){b[j]=b[j]+b[j+1];b[j+1]=b[j]-b[j+1];b[j]=b[j]-b[j+1];}} void readDat(){int i ;FILE *fp ;fp = fopen(in.dat, r) ;for(i=0;iMAX;i++)fscanf(fp, %d, a[i]) ;fclose(fp) ;} void main(){int i ;readDat() ;jsVal() ;printf(满足条件的数=%d\n, cnt) ;for(i = 0 ; i cnt ; i++) printf(%d , b[i]) ;printf(\n) ;writeDat() ;} writeDat(){FILE *fp ;int i ;fp = fopen(out.dat, w) ;fprintf(fp, %d\n, cnt) ;for(i = 0 ; i cnt ; i++) fprintf(fp, %d\n, b[i]) ;fclose(fp) ;}************************************************