全国三级PC技术上机编程题10道7
第七套
===============================================================================
试题说明 :
===============================================================================
请编制程序PROG1.ASM, 其功能是: 内存中连续存放着10个二
进制字节，每个二进制字节的序号依次定义为0,1,…9。统计每个
字节中1的个数N(0), N(1),…, N(9)（均用一个字节表示）,然后按序将
N(0)至N(9)存入内存中，最后再用一个字节表示这10个字节中为1的位
的总数n（n= N(0)+ N(1)+…+ N(9)）。
例如：
内存中有 00H,01H,03H,…
结果为 00H,01H,02H,…,最后为n
部分程序已给出，其中原始数据由过程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 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 ; 字节数
CALL LOAD ; 从 ’INPUT1.DAT’中读取数据
; **** 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 ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N+1 ; 结果字节数
===================================================
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 ; 数据区起始地址
LEA SI,NAME0 ; 原始数据文件名
MOV CX,N ; 字节数
CALL LOAD ; 从 ’INPUT1.DAT’中读取数据
; **** 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 ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N+1 ; 结果字节数
===================================================
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 ; 数据区起始地址
LEA SI,NAME0 ; 原始数据文件名
MOV CX,N ; 字节数
CALL LOAD ; 从 ’INPUT1.DAT’中读取数据
; **** 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 ; 结果数据区首址
LEA SI,NAME1 ; 结果文件名
MOV CX,N+1 ; 结果字节数 CALL SAVE ; 保存结果到文件
RET
START ENDP
CODE ENDS
END START
===============================================================================
所需数据 :
===============================================================================
@2 input1.dat 001
00 01 03 07 0F A7 F5 F7 FF A5
#E
@3 $output1.hex 001
FFFEFDFCFBFAF9F8F7FBD750
#E