2012计算机三级网络上机_04整数各位打散组合运算题.pdf

********************************************************************* ★题目 15 （整数各位数字运算排序题) 已知数据文件IN.DAT 中存有200 个四位数，并已调用读函数readDat()把这些数存入数组 a 中，请考生编制一函数jsVal() ，其功能是：若一个四位数的千位数字上的值小于等于百位数 字上的值，百位数字上的值小于等于十位数字上的值，以及十位数字上的值小于等于个位数 字上的值，并且原四位数是偶数，则统计出满足此条件的个数cnt 并把这些四位数按从小到 大的顺序存入数组b 中，最后调用写函数writeDat()把结果cnt 以及数组b 中符合条件的四 位数输出到OUT.DAT 文件中。 void jsVal() {int i,j; int qw,bw,sw,gw; for (i=0;iMAX;i++) {qw=a[i]/1000; bw=a[i]%1000/100; sw=a[i]%100/10; gw=a[i]%10; if((qw=bw)(bw=sw)(sw=gw)(a[i]%2==0)) b[cnt++]=a[i]; } for(i=0;icnt-1;i++) for(j=i+1;jcnt;j++) if (b[i]b[j]) {qw=b[i];b[i]=b[j];b[j]=qw;} } ********************************************************************* ★题目 28 （整数各位打散组合运算题) 已知数据文件IN.DAT 中存有200 个四位数，并已调用读函数readDat()把这些数存入数组 a 中，请考生编制一函数jsVal() ，其功能是：把千位数字和十位数字重新组成一个新的十位数 ab （新十位数的十位数字是原四位数的千位数字，新十位数的个位数字是原四位数的十位数 字），以及把个位数字和百位数字组成另一个新的十位数cd （新十位数的十位数字是原四位 数的个位数字，新十位数的个位数字是原四位数的百位数字），如果新组成的两个十位数 ab-cd=0 且ab-cd=10 且两个数均是奇数，同时两个新数的十位数字均不为零，则将满足此 条件的四位数按从大到小的顺序存入数组b 中，并要计算满足上述条件的四位数的个数cnt 。 最后 main()函数调用写函数 writeDat( )把结果 cnt 以及数组 b 中符合条件的四位数输出到 OUT.DAT 文件中。 void jsVal() {int i,j,thou,hun,ten,data,ab,cd; for(i=0;i200;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)=10ab%2==1cd%2==1ab=10cd=10) b[cnt++]=a[i]; } for(i=0;icnt-1;i++) for(j=i+1;jcnt;j++) if(b[i]b[j]) {thou=b[i]; b[i]=b[j];b[j]=thou;} } ************************************************************************* ★题目 29 （整数各位打散组合运算题) 已知数据文件IN.DAT 中存有200 个四位数，并已调用读函数readDat()把这些数存入数组 a 中，请考生编制一函数jsVal() ，其功能是：把千位数字和十位数字重新组成一个新的十位数 ab （新十位数的十位数字是原四位数的千位数字，新十位数的个位数字是原四位数的十位数 字），以及把个位数字和百位数字组成另一个新的十位数cd （新十位数的十位数字是原四位 数的个位数字，新十位数的个位数字是原四位数的百位数字），如果新组成的两个十位数 ab-cd=10 且 ab-cd=20 且两个数均是偶数，同时两个新数的十位数字均不为零，则将满足 此条件的四位数按从大到小的顺序存入数组 b 中，并要