1、三级 PC 技术机试-226 及答案解析(总分：100.00，做题时间：90 分钟)一、上机题(总题数：1，分数：100.00)1.请编制程序 PROG1.ASM，其功能是：以逻辑尺 L 变量对内存中连续存放着 16 个字的数进行去高字节操作：当 L 的 i 位为 1 则将第 i 数据的高字节置为全 0，当 L 的 i 位为 0 则第 i 数据不变。将处理的结果存入 RESULT 指示的内存区。例如：设 L=0005H源数：1111H，2222H，3333H，4444H，5555H，6666H结果：0011H，2222H，0033H，4444H，5555H，6666H部分程序已经给出，其中原始
2、数据由过程 LOAD 从文件 INPUTlDAT 中读入 SOURCE 开始的内存元中，运算结果要求从 RESULT 开始存放，由过程 SAVE 保存到文件 OUTPUT1.DAT 中。填空 BEGIN 和 END 之间已给出的源程序使其完整(空白已用横线标出，每行空白一般只需一条指令，但采用功能相当的多条指令也可)，或删除 BEGIN 和 END 之间原有的代码并自行编程来完成要求的功能。对程序必须进行汇编，并与 IO.OBJ 链接产生执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。PROG1.ASM 文件内容如下：EXTRN LOAD：FAR，SAVE：FA
3、RN EQU 16STAC SEGMENT STACKDB 128 DUP(?)STAC ENDSDATA SEGMENTL DW ?SOURCE DW N DUP(?)RESULT DW N DUP(0)NAME0 DB INPUT1.DAT，0NAME1 DB OUTPUT1.DAT，0DATA ENDSCODE SEGMENTASSUME CS：CODE，DS：DATA，SS：STACSTART PROC FARPUSH DSXOR AX，AXPUSH AXMOV AX，DATAMOV DS，AXLEA DX，L ；数据区起始地址LEA SI，NAMEO ；原始数据文件名MOV CX，2
4、*(N+1) ；字节数CALL LOAD ；从 input1.dat 文件中读取数据；* * * * BECIN * * * *LEA SI，SOURCE_MOV CX，NMOV DX，_LO： MOV AX，SI_ L，DX_ STORENOT AXSTORE： MOV DI，AXADD DI，2ADD SI，2LOOP LO；* * * * END * * * *LEA DX，RESULT ；结果数据区首址LEA SI，NAME1 ；结果文件名MOV CX，2*N ；结果字节数CALL SAVE ；保存结果到文件RETSTART ENDPCODE ENDSEND START（分数：100.
5、00）_三级 PC 技术机试-226 答案解析(总分：100.00，做题时间：90 分钟)一、上机题(总题数：1，分数：100.00)1.请编制程序 PROG1.ASM，其功能是：以逻辑尺 L 变量对内存中连续存放着 16 个字的数进行去高字节操作：当 L 的 i 位为 1 则将第 i 数据的高字节置为全 0，当 L 的 i 位为 0 则第 i 数据不变。将处理的结果存入 RESULT 指示的内存区。例如：设 L=0005H源数：1111H，2222H，3333H，4444H，5555H，6666H结果：0011H，2222H，0033H，4444H，5555H，6666H部分程序已经给出，其
6、中原始数据由过程 LOAD 从文件 INPUTlDAT 中读入 SOURCE 开始的内存元中，运算结果要求从 RESULT 开始存放，由过程 SAVE 保存到文件 OUTPUT1.DAT 中。填空 BEGIN 和 END 之间已给出的源程序使其完整(空白已用横线标出，每行空白一般只需一条指令，但采用功能相当的多条指令也可)，或删除 BEGIN 和 END 之间原有的代码并自行编程来完成要求的功能。对程序必须进行汇编，并与 IO.OBJ 链接产生执行文件，最终运行程序产生结果。调试中若发现整个程序中存在错误之处，请加以修改。PROG1.ASM 文件内容如下：EXTRN LOAD：FAR，SAVE
7、：FARN EQU 16STAC SEGMENT STACKDB 128 DUP(?)STAC ENDSDATA SEGMENTL DW ?SOURCE DW N DUP(?)RESULT DW N DUP(0)NAME0 DB INPUT1.DAT，0NAME1 DB OUTPUT1.DAT，0DATA ENDSCODE SEGMENTASSUME CS：CODE，DS：DATA，SS：STACSTART PROC FARPUSH DSXOR AX，AXPUSH AXMOV AX，DATAMOV DS，AXLEA DX，L ；数据区起始地址LEA SI，NAMEO ；原始数据文件名MOV C
8、X，2*(N+1) ；字节数CALL LOAD ；从 input1.dat 文件中读取数据；* * * * BECIN * * * *LEA SI，SOURCE_MOV CX，NMOV DX，_LO： MOV AX，SI_ L，DX_ STORENOT AXSTORE： MOV DI，AXADD DI，2ADD SI，2LOOP LO；* * * * END * * * *LEA DX，RESULT ；结果数据区首址LEA SI，NAME1 ；结果文件名MOV CX，2*N ；结果字节数CALL SAVE ；保存结果到文件RETSTART ENDPCODE ENDSEND START（分数：100.00）_正确答案：(；* * * * BEGIN * * * *LEA SI，SOURCELEA DI，RESULT ；取结果区首址MOV CX，NMOV DX，1 ；定义递移检测位初值LO： MOV AX，SITEST L，DX ；测定当前数据的操作性质JP STORE ；不操作AND AX，00FFH ；置高字节全 0STORE： MOV DI，AXADD DI，2ADD SI，2SHL DX，1 ；递移检测位左移LOOP LO； * * * * END * * * *)解析：
