已知在文件IN2.DAT中存有100个产品销售记录,每个产品销售记录由产品代码dm(字符型4位)、产品名称m
已知在文件IN2.DAT中存有100个产品销售记录,每个产品销售记录由产品代码dm(字符型4位)、产品名称mc(字符型10位)、单价山(整型)、数量s1(整型)、金额je(长整型)五部分组成。其中:金额=单价×数量。函数ReadDat()的功能是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat(),其功能要求:按产品名称从大到小进行排列,若产品名称相同,则按金额从小到大进行排列,最终排列结果仍存入结构数组sell中,最后调用函数WriteDat()把结果输出到文件OUT2.DAT中。
注意:部分源程序已给出。请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。
[试题程序]
include
include
include
include
include
define MAX 100
typedef struct
{ char dm[5]; /*产品代码* /
char mc[11]; /*产品名称*/
int dj; /*单价*/
int si; /*数量*/
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("IN2.DAT","r");
for(i=0;i<100;i++)
{
fgets(str,80,fp);
memcpy(sell[i].dm,str,4);
memepy(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].si=atoi(ch);
sell[i].je=(long)sell[i].dj*sell[i].s1;}
fclose(fp);
}
void WriteDat(void)
{
FILE * fp;
int i;
fp=fopen("OUT2.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);
}
void SortDat() { int i,j; PRO xy; for(i=0;i for(j=i+1;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>sell[j].je) /*则按金额从小到大进行排列*/ { xy=sell[i];sell[i]=sell[j];sell[j]=xy;} } } 解析:此题型考查的知识点包括以下几方面:
(1)结构体数组的排序;
(2)结构体及结构体数组的相关操作;
(3)字符型数组的比较;
(4)C语言库函数的使用(如函数strcmp())。
按产品名称从大到小进行排列,若产品名称相同,则按金额从小到大进行排列,相应语句为:
if(strcmp(sell[i]).mc,sell[j]).mc)0)||((strcmp(sell[i].mc,sell[j].mc)==0)&&(sell[i].je>sell[j].je)))
解一元一次方程已知关于x的方程a-2/2=bx-3的解是x=2其中a≠0,且b≠0,求代数式a/b 数学 2020-04-09 …
已知x+y=3,xy=2,求x^2+y^2的值 已知x^2-4=0,求代数式x(x+1)^2-x( 数学 2020-05-13 …
初一方程组五题:已知整数X满足X-2/3<0,求代数式(X-1)^2007+2/X的值.1:已知整 数学 2020-05-16 …
在古代有没有"妈妈"这个词在古代如果称一个人妈妈古人能明白指的是娘亲的意思吗?我想知道古代有没有妈 语文 2020-05-16 …
求二次函数解析式,若知对称轴为x=-1,抛物线与x轴交于(1,0).怎样用y=a(x一h)²+K来 数学 2020-05-17 …
已知抛物线的对称轴为直线X=-1,与X轴交于A,B两点,与Y轴交于点C,其中A(-3,0),C(0 数学 2020-06-14 …
1.已知0<α<β<γ<2π,且sinα+sinβ+sinγ=0,cosα+cosβ+cosγ=0 数学 2020-08-02 …
1.已知2x-y=0且x不等于0,求代数式2x^2+3y^2/5x^2-y^2的值2.已知x/3=y 数学 2020-11-01 …
怎么知道人称代词在比较分句中作主语还是宾语比如Heisn'tnearlyassmart怎么知道人称代 其他 2020-11-26 …
已知对称矩阵求基础解系矩阵A=0-11-101110这个矩阵的基础解系,答案说是(101)(转置), 数学 2020-12-25 …