计算机等级考试三级PC技术上机试题：第一套

　　第一套

　　===============================================================================

　　试题说明 :

　　===============================================================================

　　请编制程序PROG1.ASM，其功能是：内存中连续存放着二个无

　　符号字节序列A(k)和B(k)(k=0,…,9;下同)，求序列C(k)，C(k)=A(k)+B(k)。

　　C(k)以字的形式按C(0),…,C(9)的顺序连续存放。

　　例如：

　　序列A(k)为30H,31H,61H,FFH,…;

　　序列B(k)为00H,01H,F1H,0AH,…。

　　则结果C(k)为0030H,0032H,0152H,0109H,…。

　　部分程序已给出, 其中原始数据由过程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(?) ; 顺序存放A0,…,A9,B0,…,B9

　　RESULT DW N DUP(0) ; 顺序存放C0,…,C9

　　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,DATAMOV DS,AX

　　LEA DX,SOURCE ; 数据区起始地址

　　LEA SI,NAME0 ; 原始数据文件名

　　MOV CX,N*2 ; 字节数

　　CALL LOAD ; 从 ’INPUT1.DAT’中读取数据

　　; **** BEGIN ****

　　MOV DI,___________

　　MOV BX,__

　　___________________

　　PRO: MOV AH,0

　　MOV AL,SOURCE[BX+10] ; 序列Bk中的一个字节

　　__________________________ ; Ck=Bk+Ak

　　JNC JUMP ; 无进位转JUMP

　　__________________ ; 有进位，进位入AH

　　JUMP: MOV [DI],AX ; Ck=Bk+Ak的字的形式存入RESULT

　　INC BX

　　________________

　　DEC CX

　　JNZ PRO

　　; **** END ****

　　LEA DX,RESULT ; 结果数据区首址

　　LEA SI,NAME1 ; 结果文件名

　　MOV CX,N*2 ; 结果字节数

　　CALL SAVE ; 保存结果到文件

　　RET

　　START ENDP

　　CODE ENDS

　　END START

　　===============================================================================

　　所需数据 :

　　===============================================================================

　　@2 input1.dat 001

　　FF 80 7F 00 7F 80 FF 80 81 00 FF FF 80 00 81 00 00 81 FE FF

　　#E

　　@3 $output1.hex 001

　　01FE80FE00FFFFFFFFFE7FFF00FFFEFE80FE00FF7F

　　#E