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[i]/1000;
hun = a[i]%1000/100;
ten = a[i]%100/10;
data = a[i]%10;
if (thou-hun-ten-data > 0)
{ count++;
ave1 += a[i];
}
else
{ n++;
ave2 += a[i];
}
}
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[i]/1000;
hun = a[i]%1000/100;
ten = a[i]%100/10;
data = a[i]%10;
if (thou==0 || data==0)
continue;
ab = 10*thou+ten;
cd = 10*data+hun;
if (isprime(ab) && isprime(cd))
{ b[count] = a[i];
count++;
}
}
for (i=0; i
for (j=i+1; j
if (b[i] < b[j])
{ data = b[i];
b[i] = b[j];
b[j] = 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个位置上，而原来第i+1个至倒数第i个元素依次向前移动一个位置;③重复第②步直至圈中只剩下p[1]为止。
【答案】
void Josegh(void)
{ int i, j, s1, w;
s1 = s;
for (i=1; i<=n; i++)
p[i-1] = i;
for (i=n; i>=2; i--)
{ s1 = (s1+m-1)%i;
if (s1 == 0)
s1 = i;
w = p[s1-1];
for (j=s1; j<=i-1; j++)
p[j-1] = p[j];
p[i-1] = w;
}
}