四、產品五個因素的比較排列，是結構體操作問題

　　已知在文件IN.DAT中存有100個產品銷售記錄，每個產品銷售記錄由產品代碼dm(字符型4位)，產品名稱mc(字符型10位)，單價dj(整型)，數量sl(整型)，金額je(長整型)四部分組成。其中：金額=單價*數量計算得出。函數ReadDat()是讀取這100個銷售記錄并存入結構數組sell中。請編制函數SortDat()，其功能要求：按產品代碼從大到小進行排列，若產品代碼相同，則按金額從大到小進行排列，最終排列結果仍存入結構數組sell中，最后調用函數WriteDat()把結果輸出到文件OUT8.DAT中。

　　部分源程序已給出。

　　請勿改動主函數main()、讀數據函數ReadDat()和輸出數據函數WriteDat()的內容。

　　#include

　　#include

　　#include

　　#include

　　#include

　　#define MAX 100

　　typedef struct{

　　char dm[5]; /*產品代碼*/

　　char mc[11]; /*產品名稱*/

　　int dj; /*單價*/

　　int sl; /*數量*/

　　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("IN.DAT","r");

　　for(i=0;i<100;i++){

　　fgets(str,80,fp);

　　memcpy(sell.dm,str,4);

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

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

　　sell.dj=atoi(ch);

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

　　sell.sl=atoi(ch);

　　sell.je=(long)sell.dj*sell.sl;

　　}

　　fclose(fp);

　　}

　　void WriteDat(void)

　　{

　　FILE *fp;

　　int i;

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

　　for(i=0;i<100;i++){

　　fprintf(fp,"%s %s %4d %5d %10Ld\n", sell.dm,sell.mc,sell.dj,sell.sl,sell.je);

　　}

　　fclose(fp);

　　}

　　注：

　　void SortDat()

　　{

　　int i,j;

　　PRO swap;

　　for(i=0;i

　　for(j=i+1;j

　　{

　　if(strcmp(sell.mc,sell[j].mc)<0)

　　{

　　swap=sell;

　　sell=sell[j];

　　sell[j]=swap;

　　}

　　if(strcmp(sell.mc,sell[j].mc)==0&&sell.je

　　{

　　swap=sell;

　　sell=sell[j];

　　sell[j]=swap;

　　}

　　}

　　}

　　　　　　　2010年9月計算機等級考試成績查詢匯總