计算机三级上机答案.doc

1.已知文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)、产品名称mc(字符型10位)、单价dj(整型)、数量sl(整型)、金额je(长整型)几部分组成。其中：金额＝单价×数量。函数ReadDat()的功能是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按产品名称从大到小进行排列，若产品名称相同，则按金额从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT.DAT中。 void SortDat() { 　 int i，j； /*定义循环控制变量*/ PRO temp； /*定义数据交换时的暂存变量(这里是结构体变量)*/ for(i＝0；i99；i＋＋) /*利用起泡法进行排序*/ 　　for(j＝i＋1；j100；j＋＋) 　　if(strcmp(sell[i].mc，sell[j].mc)0)/*产品名称从小到大排列*/ 　　{　 temp＝sell[i]； 　　　　sell[i]＝sell[j]； 　　　　sell[j]＝temp； 　　} 　　else if(strcmp(sell[i].mc，sell[j].mc)＝＝0) /*若产品名称相同*/ 　　　　if(sell[i].jesell[j].je) /*则按金额从小到大进行排列*/ 　　　　{　 temp＝sell[i]； 　　　　　　sell[i]＝sell[j]； 　　　　　　sell[j]＝temp； 　　　　} } 2.已知数据文件IN.DAT中存有300个4位数，并已调用读函数readDat()把这些数存入数组a中。请编制函数jsValue()，其功能是：求出千位数上的数加个位数上的数等于百位数上的数加十位数上的数的个数cnt，再把所有满足此条件的4位数依次存入数组b中，然后对数组b的4位数按从小到大的顺序进行排序，最后调用写函数writeDat()把数组b中的数输出到OUT.DAT文件中。 voidjsValue() {　 int i，j； int a1，a2，a3，a4； int temp； for(i＝0；i300；i＋＋) { 　 a4＝a[i]/1000；　　　　/*求四位数的千位数字*/ 　　 a3＝a[i]%1000/100； 　　/*求四位数的百位数字*/ 　　 a2＝a[i]%100/10；　　　　/*求四位数的十位数字*/ 　　 a1＝a[i]%10； 　　　　/*求四位数的个位数字*/ 　　 if (a4＋a1＝＝a3＋a2)　/*如果千位数字加个位数字等于百位数字加十位数字*/ 　　 { 　 b[cnt]＝a[i]；　　　/*将满足条件的数存入数组b中*/ 　　　　 cnt＋＋； 　　　　/*统计满足条件的数的个数cnt*/ 　　 } } for(i＝0；icnt－1；i＋＋) 　　/*用起泡法对数组b的4位数按从小到大的顺序排序*/ 　　 for(j＝i＋1；jcnt；j＋＋) 　　　　if(b[i]b[j]) 　　　　{　 temp＝b[i]； 　　　　　　 b[i]＝b[j]； 　　　　　　 b[j]＝temp； 　　　　} } 3.已知数据文件IN.DAT中存有200个4位数，并已调用读函数readDat() 把这些数存入数组a中，请编制一个函数jsVal()，其功能是：把千位数字和十位数字重新组成一个新的2位数ab(新十位数的2位数字是原4位数的千位数字，新2位数的个位数字是原4位数的十位数字)，以及把个位数字和百位数字组成另一个新的十位数cd(新十位数的十位数字是原4位数的个位数字，新2位数的个位数字是原4位数的百位数字)，如果新组成两个2位数ab－cd＝0且ab－cd＝10且两个数均是奇数，同时两个新十位数字均不为零，则将满足此条件的4位数按从大到小的顺序存入数组b中，并要计算满足上述条件的4位数的个数cnt，最后调用写函数writeDat()把结果cnt及数组b中符合条件的4位数输出到OUT.DAT文件中。 void jsVal() {　 int i，j；　　　　　　 　/*定义循环控制变量*/ int a1，a2，a3，a4； 　 /*定义变量保存4位数的每位数字*/ int temp； 　　　　 /*定义数据交换时的暂存变量