设在某市区的某娱乐公司，2009年度经营情况如下：
(1) 全年歌舞厅取得收入650万元、与歌舞厅相关的烟酒饮料收入200万元，下半年开业的高尔夫球馆和保龄球馆分别取得收入230万元和160万元(当地规定歌舞厅、高尔夫球营业税税率为20%，保龄球馆营业税税率为5%)：
(2) 投资收益科目记载：购买国债取得利息收入10万元，购买国家发行的金融债券取得利息收入15万元：
(3) 全年发生经营成本250万元、经营费用120万元、管理费用200万元(其中含业务招待费用20万元)。上述成本、费用中不含工资及工资附加的“项经费”；
(4) 经有关部门批准向职工集资100万元，用于弥补经营资金不足，集资期限10个月，支付利息8万元(同期银行贷款年利率为6%)；
(5) 公司全年有职工100人，实发工资总额246万元，并实际发生职工工会经费5.92万元、职工福利费34.44万元、职工教育经费8.25万元。
要求：根据所给资料，回答下列问题(以下金额均为合计金额)：

计算投资收益应调增的应纳税所得额；

已知在文件IN61.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)、产品名称mc(字符型10位)、单价dj(整型)、数量s1(整型)、金额je(长整型)几部分组成。其中，金额=单价×数量可计算得出。函数ReadDat()的功能是读取这100个销售记录并存入数组sell中。请编制函数SortDat()，其功能要求：按金额从小到大进行排列，若金额相同，则按产品代码从大到小进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出到文件 OUT61.DAT中。
注意：部分源程序已给出。
请勿改动主函数main()、读函数ReadDat()和写函数WriteDat()的内容。
试题程序：
#include＜stdio. h＞
# inc lude＜mem, h＞
#include＜string. h＞
# inc lude＜conio, h＞
#inc lude＜stdl ib. h＞
#define MAX 100
typedef struct

char dm[5];
char mc[ll];
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("IN61.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 ()

FILE *fp;
int i;
fp=fopen ( "OUT61. DAT", "w" );
for (i=0; i＜100; i++)

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

fclose (fp);