第七套
===============================================================================
試題說(shuō)明 :
===============================================================================
請(qǐng)編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著10個(gè)二
進(jìn)制字節(jié)，每個(gè)二進(jìn)制字節(jié)的序號(hào)依次定義為0,1,…9。統(tǒng)計(jì)每個(gè)
字節(jié)中1的個(gè)數(shù)N(0), N(1),…, N(9)（均用一個(gè)字節(jié)表示）,然后按序?qū)?BR> N(0)至N(9)存入內(nèi)存中，最后再用一個(gè)字節(jié)表示這10個(gè)字節(jié)中為1的位
的總數(shù)n（n= N(0)+ N(1)+…+ N(9)）。
例如：
內(nèi)存中有 00H,01H,03H,…
結(jié)果為 00H,01H,02H,…,最后為n
部分程序已給出，其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
中讀入SOURCE開始的內(nèi)存單元中。運(yùn)算結(jié)果要求從RESULT開始存放,
由過(guò)程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之間已給出的源程序使其完整 (空白已用橫線
標(biāo)出，每行空白一般只需一條指令，但采用功能相當(dāng)?shù)亩鄺l指令亦
可)， 或刪除BEGIN和END之間原有的代碼并自行編程來(lái)完成要求的
功能。
對(duì)程序必須進(jìn)行匯編， 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文
件，最終運(yùn)行程序產(chǎn)生結(jié)果(無(wú)結(jié)果或結(jié)果不正確者均不得分)。調(diào)
試中若發(fā)現(xiàn)整個(gè)程序中存在錯(cuò)誤之處，請(qǐng)加以修改。
===============================================================================
程序 :
===============================================================================
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N 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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
MOV CL,N
MOV DI,OFFSET RESULT
MOV BX,0
MOV DH,0
PRO: MOV DL,0
MOV AL,SOURCE[BX]
MOV CH,__
COUNT: __________________
JNC ____
INC DL
JUMP: DEC CH
___ COUNT
MOV [DI],__
ADD DH,DL
INC DI
INC BX
DEC CL
JNZ PRO
MOV _________
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+1 ; 結(jié)果字節(jié)數(shù)
===================================================
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N 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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
MOV CL,N
MOV DI,OFFSET RESULT
MOV BX,0
MOV DH,0
PRO: MOV DL,0
MOV AL,SOURCE[BX] MOV CH,__
COUNT: __________________
JNC ____
INC DL
JUMP: DEC CH
___ COUNT
MOV [DI],__
ADD DH,DL
INC DI
INC BX
DEC CL
JNZ PRO
MOV _________
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+1 ; 結(jié)果字節(jié)數(shù)
===================================================
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N 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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
MOV CL,N
MOV DI,OFFSET RESULT
MOV BX,0
MOV DH,0
PRO: MOV DL,0
MOV AL,SOURCE[BX]
MOV CH,__
COUNT: __________________
JNC ____
INC DL
JUMP: DEC CH
___ COUNT
MOV [DI],__
ADD DH,DL
INC DI
INC BX
DEC CL
JNZ PRO
MOV _________
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+1 ; 結(jié)果字節(jié)數(shù) CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
===============================================================================
所需數(shù)據(jù) :
===============================================================================
@2 input1.dat 001
00 01 03 07 0F A7 F5 F7 FF A5
#E
@3 $output1.hex 001
FFFEFDFCFBFAF9F8F7FBD750
#E
===============================================================================
試題說(shuō)明 :
===============================================================================
請(qǐng)編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著10個(gè)二
進(jìn)制字節(jié)，每個(gè)二進(jìn)制字節(jié)的序號(hào)依次定義為0,1,…9。統(tǒng)計(jì)每個(gè)
字節(jié)中1的個(gè)數(shù)N(0), N(1),…, N(9)（均用一個(gè)字節(jié)表示）,然后按序?qū)?BR> N(0)至N(9)存入內(nèi)存中，最后再用一個(gè)字節(jié)表示這10個(gè)字節(jié)中為1的位
的總數(shù)n（n= N(0)+ N(1)+…+ N(9)）。
例如：
內(nèi)存中有 00H,01H,03H,…
結(jié)果為 00H,01H,02H,…,最后為n
部分程序已給出，其中原始數(shù)據(jù)由過(guò)程LOAD從文件INPUT1.DAT
中讀入SOURCE開始的內(nèi)存單元中。運(yùn)算結(jié)果要求從RESULT開始存放,
由過(guò)程SAVE保存到文件OUTPUT1.DAT中。
填空BEGIN和END之間已給出的源程序使其完整 (空白已用橫線
標(biāo)出，每行空白一般只需一條指令，但采用功能相當(dāng)?shù)亩鄺l指令亦
可)， 或刪除BEGIN和END之間原有的代碼并自行編程來(lái)完成要求的
功能。
對(duì)程序必須進(jìn)行匯編， 并與IO.OBJ鏈接產(chǎn)生PROG1.EXE執(zhí)行文
件，最終運(yùn)行程序產(chǎn)生結(jié)果(無(wú)結(jié)果或結(jié)果不正確者均不得分)。調(diào)
試中若發(fā)現(xiàn)整個(gè)程序中存在錯(cuò)誤之處，請(qǐng)加以修改。
===============================================================================
程序 :
===============================================================================
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N 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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
MOV CL,N
MOV DI,OFFSET RESULT
MOV BX,0
MOV DH,0
PRO: MOV DL,0
MOV AL,SOURCE[BX]
MOV CH,__
COUNT: __________________
JNC ____
INC DL
JUMP: DEC CH
___ COUNT
MOV [DI],__
ADD DH,DL
INC DI
INC BX
DEC CL
JNZ PRO
MOV _________
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+1 ; 結(jié)果字節(jié)數(shù)
===================================================
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N 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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
MOV CL,N
MOV DI,OFFSET RESULT
MOV BX,0
MOV DH,0
PRO: MOV DL,0
MOV AL,SOURCE[BX] MOV CH,__
COUNT: __________________
JNC ____
INC DL
JUMP: DEC CH
___ COUNT
MOV [DI],__
ADD DH,DL
INC DI
INC BX
DEC CL
JNZ PRO
MOV _________
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+1 ; 結(jié)果字節(jié)數(shù)
===================================================
EXTRN LOAD:FAR,SAVE:FAR
N EQU 10
STAC SEGMENT STACK
DB 128 DUP (?)
STAC ENDS
DATA SEGMENT
SOURCE DB N 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 ; 數(shù)據(jù)區(qū)起始地址
LEA SI,NAME0 ; 原始數(shù)據(jù)文件名
MOV CX,N ; 字節(jié)數(shù)
CALL LOAD ; 從 ’INPUT1.DAT’中讀取數(shù)據(jù)
; **** BEGIN ****
MOV CL,N
MOV DI,OFFSET RESULT
MOV BX,0
MOV DH,0
PRO: MOV DL,0
MOV AL,SOURCE[BX]
MOV CH,__
COUNT: __________________
JNC ____
INC DL
JUMP: DEC CH
___ COUNT
MOV [DI],__
ADD DH,DL
INC DI
INC BX
DEC CL
JNZ PRO
MOV _________
; **** END ****
LEA DX,RESULT ; 結(jié)果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結(jié)果文件名
MOV CX,N+1 ; 結(jié)果字節(jié)數(shù) CALL SAVE ; 保存結(jié)果到文件
RET
START ENDP
CODE ENDS
END START
===============================================================================
所需數(shù)據(jù) :
===============================================================================
@2 input1.dat 001
00 01 03 07 0F A7 F5 F7 FF A5
#E
@3 $output1.hex 001
FFFEFDFCFBFAF9F8F7FBD750
#E