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

　　部分源程序已給出。

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

　　#include

　　#include

　　#include

　　#include

　　#include

　　#define MAX 100

　　typedef struct{

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

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

　　int dj; /*單價*/

　　int sl; /*數(shù)量*/

　　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[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].sl=atoi(ch);

　　sell[i].je=(long)sell[i].dj*sell[i].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 M ] 1d\\n\", sell[i].dm,sell[i].mc,sell[i].dj,sell[i].sl,sell[i].je);

　　}

　　fclose(fp);

　　}

　　--------------------------------------------------------------------------------