美国汪利宏的蒙特卡洛及卷积模拟程序，可以模拟top-hat光束和高斯光束在生物组织中的传输-U.S. WANG Li-hong of the Monte Carlo and convolution simulation program can simulate the top-hat beam and Gaussian beam transport in tissue

已知在文件IN.DAT中存有100个产品销售记录，每个产品销售记录由产品代码dm(字符型4位)，产品名称mc(字符型10位)，单价dj(整型)，数量sl(整型)，金额je(长整型)五部分组成。其中：金额=单价*数量计算得出。函数ReadDat()是读取这100个销售记录并存入结构数组sell中。请编制函数SortDat()，其功能要求： 按产品名称从小到大进行排列，若产品名称相等，则按金额从小到大进行排列，最终排列结果仍存入结构数组sell中，最后调用函数WriteDat()把结果输出