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

　46.已知数据文件IN.dat中存有300个四位数，并已挪用读函数RData()把这些数存入数组a中，请编写函数diffVal()，其功能是：求出千位上的数减百位上的数减十位上的数减个位上的数大于0的个数count，再求出所有知足此前提的四位数的平均值ave1，以及不知足此前提的四位数的平均值ave2。最后挪用写函数WData()，把结不美观输出到OUT.dat文件中。
　　例如，9123，9-1-2-3>0，则该数知足前提，计较平均值ave1，且个数count=count+1。9812，9-8-1-2<0，则该数不知足前提，计较平均值ave2。
　　【谜底】
　　void diffVal()
　　{ int i, thou, hun, ten, data, n = 0;
　　for (i=0; i<300; i++)
　　{ thou = a/1000;
　　hun = a%1000/100;
　　ten = a%100/10;
　　data = http://www.examw.com/ncre/three/db/149391/a%10;
　　if (thou-hun-ten-data > 0)
　　{ count++;
　　ave1 += a;
　　}
　　else
　　{ n++;
　　ave2 += a;
　　}
　　}
　　ave1 /= count;
　　ave2 /= n;
　　}
　　47.
　　已知数据文件IN.dat中存有200个四位数，并已挪用读函数Rdata()把这些数存入数组a中，请编写函数spellNum()，其功能是：把千位数字和十位数字从头组成一个新的二位数(新二位数的十位数字是原四位数的千位数字，新二位数的个位数字是原四位数的十位数字)，以及把个位数字和百位数字组成另一个新的二位数(新二位数的十位数字是原四位数的个位数字，新二位数的个位数字是原四位数的百位数字)，如不美观新组成的两个二位数均是素数且新数的十位数字均不为0，则将知足此前提的四位数按从大到小的挨次存入数组b中，并要计较知足上述前提的四位数的个数count。最后main()函数挪用写函数Wdata()，把结不美观count以及数组b中合适前提的四位数输出到OUT.dat文件中。
　　【谜底】
　　void spellNum()
　　{ 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/149391/a%10;
　　if (thou==0 || data=http://www.examw.com/ncre/three/db/149391/=0)
　　continue;
　　ab = 10*thou+ten;
　　cd = 10*data+hun;
　　if (isprime(ab) ;; isprime(cd))
　　{ b = a;
　　count++;
　　}
　　}
　　for (i=0; i
　　for (j=i+1; j
　　if (b < b)
　　{ data = http://www.examw.com/ncre/three/db/149391/b;
　　b = b;
　　b = data;
　　}
　　}
　　48.设有n小我围坐一圈并按顺时针标的目的从1到n编号，从第s小我起头进行1到m的报数，报数到第m小我，此人出圈，再从他的下矣闽人从头起头1到m的报数，如斯进行下去直到所有的人都出圈为止。现要求按出圈顺序，每10人一组，给出这n小我的挨次表。请编写函数Josegh()实现此功能，并挪用函数WriteDat()，把结不美观p输出到OUT.dat文件中。
　　设n=100，s=1，m=10。
　　①将1到n小我的序号存入一维数组p中;②若第i小我报数后出圈，则将p置于数组的倒数第i个位置上，而原本第i+1个至倒数第i个元素依次向前移动一个位置;③一再第②步直至圈中只剩下p为止。
　　【谜底】
　　void Josegh(void)
　　{ int i, j, s1, w;
　　s1 = s;
　　for (i=1; i<=n; i++)
　　p = i;
　　for (i=n; i>=2; i--)
　　{ s1 = (s1+m-1)%i;
　　if (s1 == 0)
　　s1 = i;
　　w = p;
　　for (j=s1; j<=i-1; j++)
　　p = p;
　　p = w;
　　}
　　}