61.已知在文件IN.dat中存有若干个(少于200个)四位数字的正整数，函数ReadDat()读取这若干个正整数并存入数组number中。请编写函数CalValue()，其功能要求是：①求出文件中共有的正整数个数totNum;②求这些数右移1位后，产生的新数是奇数的数的个数totCnt以及满足此条件的这些数(右移前的值)的算术平均值totAve。最后调用函数writeDat()把所求的结果输出到OUT.dat文件中。

　　【答案】

　　void CalValue(void)

　　{ int i, data;

　　for (i=0; i

　　{ if (!number[i])

　　break;

　　if (number[i] > 0)

　　totNum++;

　　data = number[i]>>1;

　　if (data%2)

　　{ totCnt++;

　　totAve += number[i];

　　}

　　}

　　totAve /= totCnt;

　　}

　　62.已知数据文件IN.dat中存有200个四位数，并已调用读函数readDat()把这些数存入数组a中，请编写函数spellNum()，其功能是：把个位数字和千位数字重新组成一个新的二位数(新二位数的十位数字是原四位数的个位数字，新二位数的个位数字是原四位数的千位数字)，以及把百位数字和十位数字组成另一个新的二位数(新二位数的十位数字是原四位数的百位数字，新二位数的个位数字是原四位数的十位数字)，如果新组成的两个二位数均是偶数并且两个二位数中至少有一个数能被9整除，同时两个新数的十位数字均不为0，则将满足此条件的四位数按从大到小的顺序存入数组b中，并要计算满足上述条件的四位数的个数cnt。最后main()函数调用写函数writeDat()，把结果cnt以及数组b中符合条件的四位数输出到OUT.dat文件中。

　　【答案】

　　void spellNum()

　　{ int i, thou, hun, ten, data, j;

　　int ab, cd;

　　for (i=0; i

　　{ thou = a[i]/1000;

　　hun = a[i]%1000/100;

　　ten = a[i]%100/10;

　　data = a[i]%10;

　　if (data==0 || hun==0)

　　continue;

　　ab = 10*data+thou;

　　cd=10*hun+ten;

　　if ((ab%9==0 || cd%9==0) && ab%2!=1 && cd%2!=1)

　　{ b[cnt] = a[i];

　　cnt++;

　　}

　　}

　　for (i=0; i

　　for (j=i+1; j

　　if (b[i] < b[j])

　　{ data = b[i];

　　b[i] = b[j];

　　b[j] = data;

　　}

　　}

　　63.在文件IN.dat中有200组数据，每组有3个数，每个数均是三位数。函数Rdata()读取这200组数据存放到结构数组aa中，请编写函数greatSort()，其功能是：要求在200组数据中找出条件为每组中的第1个数大于第2个数加第3个数的和，其中满足条件的组数作为函数greatSort()的返回值，同时把满足条件的数据存入结构数组bb中，再对bb中的数据按照每组数据的第1个数加第3个数之和的大小进行升序排列(第1个数加第3个数的和均不相等)，排序后的结果仍重新存入结构数组bb中。最后调用函数Wdata()，把结果bb输出到OUT.dat文件中。

　　【答案】

　　int greatSort()

　　{ int i, j, count = 0;

　　data val;

　　for (i=0; i<200; i++)

　　if (aa[i].x1 > aa[i].x2+aa[i].x3)

　　{ bb[count] = aa[i];

　　count++;

　　}

　　for (i=0; i

　　for (j=i+1; j

　　if (bb[i].x1+bb[i].x3 > bb[j].x1+bb[j].x3)

　　{ val = bb[i];

　　bb[i] = bb[j];

　　bb[j] = val;

　　}

　　return count;

　　}