第六十一题：
一、请编制程序，其功能是：内存中连续存放着两个有符号字节数序列AK和BK（k=0,…,9），求序列CK，CK=AK×BK（CK以有符号字的形式按C0,…,C9的顺序连续存放）。
例如：
序列AK为 80H,C0H,81H,00H…
序列BK为 80H,C0H,81H,7FH…
则结果CK为 4000H,1000H,3F01FH,0000H…
部分程序已给出, 其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放,由过程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之间已给出的一段源程序使其完整(空白已用横线标出,每行空白一般只需一条指令, 但采用功能相当的多条指令亦可),或删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。
对程序必须进行汇编,并与IO.OBJ链接产生PROG1.EXE执行文件,最终运行程序产生结果（无结果或结果不正确者均不得分）。调试中若发现整个程序中存在错误之处, 请加以修改。

试题程序：

EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP(?)
STAC ENDS
DATA SEGMENT
SOURCE DB N*2 DUP(?)
RESULT DW N DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 DB 'OUTPUT1.DAT',0
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,SS:STAC
START PROC FAR
PUSH DS
XOR AX,AX
PUSH AX
MOV AX,DATA
MOV DS,AX
LEA DX,SOURCE ;数据区起始地址
LEA SI,NAME0 ;原始数据文件名
MOV CX,N*2 ;字节数
CALL LOAD ;从'INPUT1.DAT'中读取数据
;****BEGIN****
MOV DI,______________
__________________________
MOV CX,N
PRO: MOV AL,______________
________ SOURCE[BX]
MOV [DI],AX
ADD _________________
INC BX
__________________________
JNZ PRO
;****END****
LEA DX,RESULT ;结果数据区首址
LEA SI,NAME1 ;结果文件名
MOV CX,N*2 ;字节数
CALL SAVE ;保存结果到文件
RET
START ENDP
CODE ENDS
END START

第六十二题：
一、请编制程序，其功能是：内存中连续存放着16个12位二进制数DB11DB10…DB0，每个二进制数均用两个字节表示，其存放格式均为
DB11 DB10 DB9 DB8 DB7 DB6 DB5 DB4 DB3 DB2 DB1 DB0 0 0 0 0
|←--------低地址字节-------→∣ |←----高地址字节----→∣
请判别这16个12位二进制数是否大于800H；若大于800H，则相应地在内存中存入01H；否则，存入00H。最后存放这16个12位二进制数中大于800H的数的个数n（n用一个字节表示）。
例如：
内存中有： 12H,30H,84H,50H,80H,00H…
结果为： 00H,01H,00H…（共16个字节），后跟n部分程序已给出，其中原始数据由过程LOAD从文件INPUT1.DAT中读入SOURCE开始的内存单元中。运算结果要求从RESULT开始存放,由过程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之间已给出的一段源程序使其完整(空白已用横线标出,每行空白一般只需一条指令, 但采用功能相当的多条指令亦可),或删除BEGIN和END之间原有的代码并自行编程来完成要求的功能。
对程序必须进行汇编,并与IO.OBJ链接产生PROG1.EXE执行文件,最终运行程序产生结果（无结果或结果不正确者均不得分）。调试中若发现整个程序中存在错误之处, 请加以修改。

试题程序：

EXTRN LOAD:FAR,SAVE:FAR
N EQU 16
STAC SEGMENT STACK
DB 128 DUP(?)
STAC ENDS
DATA SEGMENT
SOURCE DB N*2 DUP(?)
RESULT DB N+1 DUP(0)
NAME0 DB 'INPUT1.DAT',0
NAME1 DB 'OUTPUT1.DAT',0
DATA ENDS
CODE SEGMENT
ASSUME CS:CODE,DS:DATA,SS:STAC
START PROC FAR
PUSH DS
XOR AX,AX
PUSH AX
MOV AX,DATA
MOV DS,AX
LEA DX,SOURCE ;数据区起始地址
LEA SI,NAME0 ;原始数据文件名
MOV CX,N*2 ;字节数
CALL LOAD ;从'INPUT1.DAT'中读取数据
;****BEGIN****
MOV CH,N
MOV CL,00H ;大于800的数的个数n
MOV BX,0
MOV DI,____________________
PRO: MOV AH,[BX]
MOV AL,[BX+1]
CMP AX,____________________
JBE _______________________ ;<=800H
MOV [DI],DH ;>800H
INC CL
INC DI
JMP JUMP
C_0: MOV [DI],DL
INC DI
JUMP: ADD BX,2
DEC CH
JNZ PRO
MOV [DI],_________________
;****END****
LEA DX,RESULT ;结果数据区首址
LEA SI,NAME1 ;结果文件名
MOV CX,N+1 ;字节数
CALL SAVE ;保存结果到文件
RET
START ENDP
CODE ENDS
END START