已知在文件IN5.DAT中存有100个产品销售记录,每个产品销售记录由产品代码dm(字符型4位)、产品名称m

Question

已知在文件IN5.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)、产品名称mc(字符型10位)、单价dj(整型)、数量s1(整型)、金额je(长整型)五部分组成。其中：金额＝单价×数量。函数ReadDat()的功能是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求：按金额从大到小进行排列，若金额相等，则按产品代码从小到大进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件OUT5.DAT中。

注意：部分源程序已给出。请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。

[试题程序]

include

include

include

include

include

define MAX 100

typedef struct

{ chardm[5]; /*产品代码*/

charmc[11]; /*产品名称*/

int dj; /*单价*/

int s1; /*数量*/

long je; /*金额*/

}PRO;

PRO sell[MAX];

void ReadDat();

void WriteDat();

void SortDat()

{

}

void main()

{

memset(sell,0,sizeof(sell));

ReadDat();

SortDat();

WriteDat();

}

void ReadDat()

{

FILE *fp;

char str[80],ch[11];

int i;

fp=fopen("IN5.DAT","r");

for(i＝0;i＜100;i++)

{

fgets(str,80,fp);

memcpy(sell[i].dm,str,4);

memcpy(sell[i].mc,str+4,10);

memcpy(ch,str+14,4);ch[4]=0;

sell[i].dj=atoi(ch);

memcpy(ch,str+18,5);ch[5]=0;

sell[i].s1=atoi(ch);

sell[i].je=(long)sell[i].dj*sell[i].s1;

}

fclose(fp);

}

void WriteDat(void)

{

FILE *fp;

int i;

fp=fopen("OUT5.DAT","w");

for(i=0;i＜100;i++)

fprintf(fp,"%s%s%4d%5d%101d\n",sell[i].dm,sell[i].mc,sell[i].dj,sell[i].s1,sell[i].je);

fclose(fp);

}

Answer 1

正确答案：void SortDat() { int ij; PRO xy; for(i=O;iMAX-1;i++) for(j=i+1;jMAX;j++) { if(sell[i].jesell[j].je) /*按金额从大到小进行排列*/ {xy=sell[i];sell[i]=sell[j];sell[j]=xy;} else if(sell[i].je==sell[j].je) /*若金额相同*/ if(strcmp(sell[i].dmsell[j].dm)＞0) /*则按代码从小到大进行排列*/ {xy=sell[i];sell[i]=sell[j];sell[j]=xy;} } }
void SortDat() { int i,j; PRO xy; for(i=O;iMAX-1;i++) for(j=i+1;jMAX;j++) { if(sell[i].jesell[j].je) /*按金额从大到小进行排列*/ {xy=sell[i];sell[i]=sell[j];sell[j]=xy;} else if(sell[i].je==sell[j].je) /*若金额相同*/ if(strcmp(sell[i].dm,sell[j].dm)＞0) /*则按代码从小到大进行排列*/ {xy=sell[i];sell[i]=sell[j];sell[j]=xy;} } } 解析：此题型考查的知识点包括以下几方面：
(1)结构体数组的排序；
(2)结构体及结构体数组的相关操作；
(3)字符型数组的比较；
(4)C语言库函数的使用(如函数strcmp())。
此题按金额从大到小进行排列，若金额相等，则按产品代码从小到大进行排列，相应语句为：
if((ssll[i].jesell[j].je)||((sell[i].je==sell[j].je)＆&(strcmp(sell[i].dm,sell[j].dm)＞0)))