第四套
===============================================================================
試題說明 :
===============================================================================
請編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著二個有
符號字節(jié)序列A(k)和B(k)(k=0,…,9;下同)，求序列C(k)，C(k)=A(k)÷B(k)。
運算結果按序以字的形式連續(xù)存放(低字節(jié)為商，高字節(jié)為余數(shù))。
例如：
序列A(k)為FFH(-1D), 81H(-127D),C0H(-64D),80H(-128D),…；
序列B(k)為81H(-127D),40H(64D),81H(-127D),01H(1D),…。
則結果C(k)為FF00H（00H(0D)為商、FFH(-1D)為余數(shù)）,C1FFH,
C000H,0080H,…。
部分程序已給出，其中原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT
中讀入SOURCE開始的內(nèi)存單元中，運算結果要求從RESULT開始存放,
由過程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之間已給出的源程序使其完整 (空白已用橫線
標出, 每行空白一般只需一條指令，但采用功能相當?shù)亩鄺l指令亦
可)， 或刪除BEGIN和END之間原有的代碼并自行編程來完成要求的
功能。
對程序必須進行匯編， 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文
件，最終運行程序產(chǎn)生結果(無結果或結果不正確者均不得分)。調(diào)
試中若發(fā)現(xiàn)整個程序中存在錯誤之處，請加以修改。
===============================================================================
程序 :
===============================================================================
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 ; 數(shù)據(jù)區(qū)起始地址 LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N*2 ; 字節(jié)數(shù)
CALL LOAD ; 從’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
___________________
MOV DI,___________
MOV CX,N
PRO: MOV AL,____________
____ ; AL中數(shù)的符號擴展到AH，正的字節(jié)
; 變成正的字，負的字節(jié)變成負的字
_____ SOURCE[BX+N]
MOV ____,AX
ADD DI,2
INC BX
DEC CX
JNZ PRO
; **** END ****
LEA DX,RESULT ; 結果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結果文件名
MOV CX,2*N ; 結果字節(jié)數(shù)
CALL SAVE ; 保存結果到文件
RET
START ENDP
CODE ENDS
END START
===============================================================================
所需數(shù)據(jù) :
===============================================================================
@2 input1.dat 001
FF 81 C0 80 00 80 40 7F 20 7F 81 40 81 01 7F 80 C0 81 01 7F
#E
@3 $output1.hex 001
FF00003EFF3F7FFFFFFFFEFF00FF00FFDFFFFEFF1F
#E
===============================================================================
試題說明 :
===============================================================================
請編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著二個有
符號字節(jié)序列A(k)和B(k)(k=0,…,9;下同)，求序列C(k)，C(k)=A(k)÷B(k)。
運算結果按序以字的形式連續(xù)存放(低字節(jié)為商，高字節(jié)為余數(shù))。
例如：
序列A(k)為FFH(-1D), 81H(-127D),C0H(-64D),80H(-128D),…；
序列B(k)為81H(-127D),40H(64D),81H(-127D),01H(1D),…。
則結果C(k)為FF00H（00H(0D)為商、FFH(-1D)為余數(shù)）,C1FFH,
C000H,0080H,…。
部分程序已給出，其中原始數(shù)據(jù)由過程LOAD從文件INPUT1.DAT
中讀入SOURCE開始的內(nèi)存單元中，運算結果要求從RESULT開始存放,
由過程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之間已給出的源程序使其完整 (空白已用橫線
標出, 每行空白一般只需一條指令，但采用功能相當?shù)亩鄺l指令亦
可)， 或刪除BEGIN和END之間原有的代碼并自行編程來完成要求的
功能。
對程序必須進行匯編， 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文
件，最終運行程序產(chǎn)生結果(無結果或結果不正確者均不得分)。調(diào)
試中若發(fā)現(xiàn)整個程序中存在錯誤之處，請加以修改。
===============================================================================
程序 :
===============================================================================
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 ; 數(shù)據(jù)區(qū)起始地址 LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N*2 ; 字節(jié)數(shù)
CALL LOAD ; 從’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
___________________
MOV DI,___________
MOV CX,N
PRO: MOV AL,____________
____ ; AL中數(shù)的符號擴展到AH，正的字節(jié)
; 變成正的字，負的字節(jié)變成負的字
_____ SOURCE[BX+N]
MOV ____,AX
ADD DI,2
INC BX
DEC CX
JNZ PRO
; **** END ****
LEA DX,RESULT ; 結果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結果文件名
MOV CX,2*N ; 結果字節(jié)數(shù)
CALL SAVE ; 保存結果到文件
RET
START ENDP
CODE ENDS
END START
===============================================================================
所需數(shù)據(jù) :
===============================================================================
@2 input1.dat 001
FF 81 C0 80 00 80 40 7F 20 7F 81 40 81 01 7F 80 C0 81 01 7F
#E
@3 $output1.hex 001
FF00003EFF3F7FFFFFFFFEFF00FF00FFDFFFFEFF1F
#E