2012年计算机三级数据库上机题及参考答案（5）

28.已知在文件IN.dat中存有若干个(<200)四位数字的正整数，函数RData()篡夺这若干个正整数并存入数组original中。请编写函数CalValue()，其功能要求是：①求出这个文件中共有若干好多个正整数totNum;②求这些数右移1位后，发生的新数是偶数的数的个数toteven，以及知足此前提的这些数(右移前的值)的算术平均值totavg。最后挪用函数WData()把所求的结不美观输出到OUT.dat文件中。
　　【谜底】
　　void CalValue(void)
　　{ int i, data;
　　for (i=0; i
　　{ if (!original)
　　break;
　　if (original > 0)
　　totNum++;
　　data = http://www.examw.com/ncre/three/db/149116/original>>1;
　　if (data%2 == 0)
　　{ toteven++;
　　totavg += original;
　　}
　　}
　　totavg /= toteven;
　　}
　　29.已知数据文件IN.dat中存有200个四位数，并已挪用读函数RData()把这些数存入数组a中，请编写函数spellVal()，其功能是：把千位数字和十位数字从头组成一个新的二位数ab(新二位数的十位数字是原四位数的千位数字，新二位数的个位数字是原四位数的十位数字)，以及把个位数字和百位数字组成另一个新的二位数cd(新二位数的十位数字是原四位数的个位数字，新二位数的个位数字是原四位数的百位数字)，如不美观新组成的两个二位数ab-cd≥0且ab-cd≤10且两个数均是奇数，同时两个新数的十位数字均不为0，则将知足此前提的四位数按从大到小的挨次存入数组b中，并要计较知足上述前提的四位数的个数count。最后main()函数挪用写函数WData()，把结不美观count以及数组b中合适前提的四位数输出到OUT.dat文件中。
　　【谜底】
　　void spellVal()
　　{ int i, thou, hun, ten, data, j;
　　int ab, cd;
　　for (i=0; i<200; i++)
　　{ thou = a/1000;
　　hun = a%1000/100;
　　ten = a%100/10;
　　data = http://www.examw.com/ncre/three/db/149116/a%10;
　　if (thou==0 || data=http://www.examw.com/ncre/three/db/149116/=0)
　　continue;
　　ab = 10*thou+ten;
　　cd = 10*data+hun;
　　if ((ab-cd)>=0 ;; (ab-cd)<=10 ;; ab%2==1 ;; cd%2==1)
　　{ b = a;
　　cnt++;
　　}
　　}
　　for (i=0; i
　　for (j=i+1; j
　　if (b < b)
　　{ data = http://www.examw.com/ncre/three/db/149116/b;
　　b = b;
　　b = data;
　　}
　　}
　　已知数据文件IN.dat中存有200个四位数，并已挪用读函数RData()把这些数存入数组a中，请编写函数seVal()，其功能是：依次从数组a中掏出一个四位数，如不美观该四位数持续小于该四位数往后的5个数且该数是偶数(该四位数往后不满4个数，则不统计)，则统计出知足此前提的个数count并把这些四位数按巨细到大的挨次存入数组b中。最后挪用写函数WData()，把结不美观count以及数组b中合适前提的四位数输出到OUT.dat文件中。
　　注重：部门轨范已经给出。轨范中已界说数组a、b，已界说变量count。请勿改动数据文件
　　【谜底】
　　void seVal()
　　{ int i, j, flag = 0;
　　for (i=0; i
　　{ for (j=i+1; j<=i+5; j++)
　　if (a < a)
　　{ flag = 1;
　　}
　　else
　　{ flag = 0;
　　break;
　　}
　　if (flag==1 ;; a%2==0)
　　{ b = a;
　　count++;
　　}
　　}
　　for (i=0; i
　　for (j=i+1; j
　　if (b > b)
　　{ flag = b;
　　b = b;
　　b = flag;
　　}
　　}