91.已知数据文件IN.dat中存有200个四位数，并已调用读函数RData()把这些数存入数组a中，请编写函数spellVal()，其功能是：把千位数字和十位数字重新组成一个新的二位数ab(新二位数的十位数字是原四位数的千位数字，新二位数的个位数字是原四位数的十位数字)，以及把个位数字和百位数字组成另一个新的二位数cd(新二位数的十位数字是原四位数的个位数字，新二位数的个位数字是原四位数的百位数字)，如果新组成的两个二位数ab-cd≥10且ab-cd≤20，并且两个数均是偶数，同时两个新数的十位数字均不为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[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 ((ab-cd)>=10 && (ab-cd)<=20 && ab%2==0 && cd%2==0)
{ 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; } } 92.已知在文件IN.dat中存有100个产品销售记录，每个产品销售记录由产品代码code(字符型4位)、产品名称name(字符型10位)、单价uprice(整型)、数量amount(整型)、金额sum(长整型)五部分组成。其中：金额=单价×数量。函数RData()是读取这100个销售记录并存入结构数组sell中。请编写函数SortDat()，其功能要求：按产品名称从大到小进行排列，若产品名称相等，则按金额从小到大进行排列，最终排列结果仍存入结构数组sell中。最后调用函数WData()，把结果输出到文件OUT.dat中。 【答案】 void SortDat() { int i, j; PRO temp; for (i=0; i for (j=i+1; j if (strcmp(sell[i].name, sell[j].name) < 0) { temp = sell[i]; sell[i] = sell[j]; sell[j] = temp; } else if(strcmp(sell[i].name, sell[j].name) == 0) { if (sell[i].sum > sell[j].sum) { temp = sell[i]; sell[i] = sell[j]; sell[j] = temp; } } } 93.已知数据文件IN.dat中存有200个四位数，并已调用读函数RData()把这些数存入数组a中，请编写函数oddVal()，其功能是：依次从数组a中取出一个四位数，如果该四位数连续大于该四位数以前的5个数且该数是奇数，并且该数必须能被7整除(该四位数前不满5个数，则不统计)，则统计出满足此条件的个数count并把这些四位数按从大到小的顺序存入数组b中。最后调用写函数WData()，把结果count以及数组b中符合条件的四位数输出到OUT.dat文件中。 【答案】 void oddVal() { int i, j, flag = 0; for (i=5; i { for (j=i-5; j { if (a[i] > a[j]) { flag = 1; } else { flag = 0; break; } } if (flag==1 && a[i]%2==1 && a[i]%7==0) { b[count] = a[i]; count++; } } for (i=0; i for (j=i+1; j if (b[i] < b[j]) { flag = b[i]; b[i] = b[j]; b[j] = flag; } }