第九套
===============================================================================
試題說明 :
===============================================================================
請編制程序PROG1.ASM, 其功能是: 內(nèi)存中連續(xù)存放著20個
ASCII字符, 如果是小寫字母a至z之間的字符,請把它們轉換成
相應的大寫字母的ASCII字符(否則不作轉換)并統(tǒng)計原20個ASCII
字符中字符“z”的個數(shù)。轉換結果(包括不作轉換的a~z之間的
原ASCII字符)按序存入內(nèi)存中,之后存放原20個ASCII字符中為
字符“z”的ASCII字符的個數(shù)(用一個字節(jié)表示)。
例如:
內(nèi)存中有30H('0'),31H('1'),61H('a'),41H('A'),7AH('z'),…
結果為 30H,31H,41H,41H,5AH,…,后跟用一個字節(jié)表示的原20
個ASCII字符中為字符“z”的個數(shù)
部分程序已給出,其中原始數(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 20
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 DI,OFFSET RESULT
MOV BX,0
MOV DL,0
MOV CX,N
PRO: MOV AL,SOURCE[BX]
CMP AL,61H
__ KEEP ; <'a'
CMP AL,7AH ; >='a'
JNBE KEEP ; >'z'
CMP AL,79H ; <='y'
JBE ____
INC DL
NINC: SUB AL,___
MOV [DI],AL
INC DI
JMP ____
KEEP: MOV [DI],AL
__________________
JUMP: INC BX
DEC CX
JNZ PRO
_________________
; **** END ****
LEA DX,RESULT ; 結果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結果文件名
MOV CX,N+1 ; 結果字節(jié)數(shù)
CALL SAVE ; 保存結果到文件
RET
START ENDP
CODE ENDS
END START
===============================================================================
所需數(shù)據(jù) :
===============================================================================
@2 input1.dat 001
30 60 31 61 32 62 33 63 34 64 35 65 41 68 7B 7A 5A 5B 40 5F
#E
@3 $output1.hex 001
CF9FCEBECDBDCCBCCBBBCABABEB784A5A5A4BFA0FE91
#E
第十套
===============================================================================
試題說明 :
===============================================================================
請編制程序PROG1.ASM,其功能是: 內(nèi)存中連續(xù)存放著10個字。
分別對每個字的高位字節(jié)和低位字節(jié)進行邏輯與運算及邏輯或運
算。 運算結果以字的形式按序連續(xù)存放(低位字節(jié)存入邏輯與運
算的結果,高位字節(jié)存入邏輯或運算的結果)。
例如:
內(nèi)存中有 AA55H,55AAH,FFAAH,…
結果為 FF00H,FF00H,FFAAH,…
部分程序已給出,其中原始數(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 DW N 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,OFFSET RESULT
MOV CX,N
MOV BX,00
PRO: MOV AX,_______________
MOV DX,AX
AND _,DH
___ AH,AL
MOV __,DL
ADD BX,2
_____________________
ADD DI,2
__________________
JNZ PRO
; **** END ****
LEA DX,RESULT ; 結果數(shù)據(jù)區(qū)首址
LEA SI,NAME1 ; 結果文件名
MOV CX,N*2 ; 結果字節(jié)數(shù)
CALL SAVE ; 保存結果到文件
RET
START ENDP
CODE ENDS
END START
===============================================================================
所需數(shù)據(jù) :
===============================================================================
@2 input1.dat 001
55 AA AA 55 AA FF FF 55 FF 00 00 FF 00 00 FF FF 70 07 80 80
#E
@3 $output1.hex 001
FF00FF005500AA00FF00FF00FFFF0000FF887F7F6E
#E