2016年計(jì)算機(jī)網(wǎng)絡(luò)三級上機(jī)試題
已知在文件IN.DAT中存有100個產(chǎn)品銷售記錄，每個產(chǎn)品銷售記錄由產(chǎn)品代碼dm(字符型4位)，產(chǎn)品名稱mc(字符型10位)，單價dj(整型)，數(shù)量sl(整型)，金額je(長整型)四部分組成。其中：金額=單價*數(shù)量計(jì)算得出。函數(shù)ReadDat()是讀取這100個銷售記錄并存入結(jié)構(gòu)數(shù)組sell中。請編制函數(shù)SortDat()，其功能要求：按產(chǎn)品代碼從小到大進(jìn)行排列，若產(chǎn)品代碼相同，則按金額從大到小進(jìn)行排列，最終排列結(jié)果仍存入結(jié)構(gòu)數(shù)組sell中，最后調(diào)用函數(shù)WriteDat()把結(jié)果輸出到文件OUT6.DAT中。
注意: 部分源程序存放在PROG1.C中。
請勿改動主函數(shù)main( )、讀數(shù)據(jù)函數(shù)ReadDat()和輸出數(shù)據(jù)函數(shù)WriteDat()的內(nèi)容。
----------------------------------
#include
#include
#include
#include
#include
#define MAX 100
typedef struct{
char dm[5]; /*產(chǎn)品代碼*/
char mc[11]; /*產(chǎn)品名稱*/
int dj; /*單價*/
int sl; /*數(shù)量*/
long je; /*金額*/
}PRO;
PRO sell[MAX];
void ReadDat();
void WriteDat();
void SortDat()
{int I,j;
PRO xy;
for(I=0;I<99;I++)
for(j=I+1;j<100;j++)
if(strcmp(sell[I].mc,sell[j].mc)>0)
{xy=sell[I]; sell [I]=sell[j]; sell[j]=xy;}
else if(strcmp(sell[I].mc,sell[j].mc)==0)
if(sell[I].je
{xy=sell[I]; sell[I]=sell[j]; sell[j]=xy;}
}
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("OUT6.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].sl,sell[i].je);}
fclose(fp);}
IN.DAT
1001軟件世界 5 100
1002計(jì)算機(jī)用戶 6 120
1003網(wǎng)上生活 27 1
1004網(wǎng)絡(luò)互連 45 10
1005威寶3.5 5 1000
10063M3.5 3 150
1007辦公自動化 90 100
1008JAVA 48 15
1009中文WORD97 68 10
1010EXCLE97 98 103
1011OFFICE97 108 18
1012ACCESS 64 78
1013二級BASIC 65 66
1014二級PASCAL 66 89
1015二級C 67 99
1016二級FOR 66 12
1017二級FOX 66 100
1018AUTO CAD 98 871
1019PhotoShop 68 64
1020一級 78 101
1021一級B類 98 1000
1022三級A類 78 765
1023三級B類 78 888
1024四級 88 666
1025INTERNET 58 1858
1001軟件世界 5 101
1002計(jì)算機(jī)用戶 6 120
1003網(wǎng)上生活 27 31
1004網(wǎng)絡(luò)互連 45 1000
1005威寶3.5 5 5001
10063M3.5 3 300
1007辦公自動化 90 871
1008JAVA 48 888
1009中文WORD97 68 999
1010EXCLE97 98 981
1011OFFICE97 108 18
1012ACCESS 64 78
1013二級BASIC 65 166
1014二級PASCAL 66 189
1015二級C 67 199
1016二級FOR 66 112
1017二級FOX 66 2000
1018AUTO CAD 98 71
1019PhotoShop 68 164
1020一級 78 110
1021一級B類 98 1100
1022三級A類 78 705
1023三級B類 78 888
1024四級 88 650
1025INTERNET 58 2858
1001軟件世界 5 102
1002計(jì)算機(jī)用戶 6 121
1003網(wǎng)上生活 27 11
1004網(wǎng)絡(luò)互連 45 20
1005威寶3.5 5 1300
10063M3.5 3 250
1007辦公自動化 90 130
1008JAVA 48 115
1009中文WORD97 68 20
1010EXCLE97 98 203
1011OFFICE97 108 818
1012ACCESS 64 178
1013二級BASIC 65 166
1014二級PASCAL 66 289
1015二級C 67 899
1016二級FOR 66 112
1017二級FOX 66 500
1018AUTO CAD 98 71
1019PhotoShop 68 4
1020一級 78 181
1021一級B類 98 1500
1022三級A類 78 65
1023三級B類 78 88
1024四級 88 66
1025INTERNET 58 858
1001軟件世界 5 200
1002計(jì)算機(jī)用戶 6 220
1003網(wǎng)上生活 27 21
1004網(wǎng)絡(luò)互連 45 30
1005威寶3.5 5 1050
10063M3.5 3 150
1007辦公自動化 90 100
1008JAVA 48 15
1009中文WORD97 68 10
1010EXCLE97 98 103
1011OFFICE97 108 18
1012ACCESS 64 78
1013二級BASIC 65 66
1014二級PASCAL 66 89
1015二級C 67 99
1016二級FOR 66 12
1017二級FOX 66 600
1018AUTO CAD 98 971
1019PhotoShop 68 164
1020一級 78 701
1021一級B類 98 8899
1022三級A類 78 115
1023三級B類 78 118
1024四級 88 116
1025INTERNET 58 58
OUT.DAT
【計(jì)算機(jī)網(wǎng)絡(luò)三級上機(jī)試題】相關(guān)文章：
計(jì)算機(jī)網(wǎng)絡(luò)三級上機(jī)考試題及答案07-04
2017年計(jì)算機(jī)網(wǎng)絡(luò)三級上機(jī)考試題及答案06-12
計(jì)算機(jī)三級Access上機(jī)試題及答案07-01
三級信息安全技術(shù)上機(jī)模擬試題201704-01