END START
5.15 数据段中已定义了一个有n个字数据的数组M，试编写一程序求出M中绝对值最大的
数，把它放在数据段的M+2n单元中，并将该数的偏移地址存放在M+2(n+1)单元中。 答：程序如下：
DSEG SEGMENT n EQU 100H ；假设n=100H M DW n DUP (?) DATA DW ? ；M+2n单元 ADDR DW ? ；M+2(n+1)单元 DSEG ENDS
；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR
ASSUME CS: CSEG, DS: DSEG
START: PUSH DS ；设置返回DOS
SUB AX, AX PUSH AX
MOV AX, DSEG MOV DS, AX ；给DS赋值
BEGIN: MOV CX, n ；循环计数器
LEA DI, M MOV AX, [DI] ；取第一个数 MOV ADDR, DI ；记下绝对值最大的数的地址 CMP AX, 0 ；此数是正数吗？ JNS ZHEN ；是正数，即为绝对值，转去判断下一个数 NEG AX ；不是正数，变为其绝对值
ZHEN: MOV BX, [DI]
CMP BX, 0 ；此数是正数吗？ JNS COMP ；是正数，即为绝对值，转去比较绝对值大小 NEG BX ；不是正数，变为其绝对值
COMP: CMP AX, BX ；判断绝对值大小
JAE ADDRESS MOV AX, BX ；(AX)<(BX)，使(AX)中为绝对值最大的数
MOV ADDR, DI ；记下绝对值最大的数的地址
ADDRESS: ADD DI, 2
LOOP ZHEN MOV DATA, AX ；记下此数 RET
MAIN ENDP CSEG ENDS ；以上定义代码段
4
；--------------------------------------------------------------------------
END START
5.16 在首地址为DATA的字数组中存放着100H个16位补码数，试编写一个程序求出它们
的平均值放在AX寄存器中；并求出数组中有多少个数小于此平均值，将结果放在BX寄存器中。 答：程序如下：
DSEG SEGMENT DATA DW 100H DUP (?) DSEG ENDS
；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR
ASSUME CS: CSEG, DS: DSEG
START: PUSH DS ；设置返回DOS
SUB AX, AX PUSH AX
MOV AX, DSEG MOV DS, AX ；给DS赋值
BEGIN: MOV CX, 100H ；循环计数器
MOV SI, 0 MOV BX, 0 ；和((DI),(BX))的初始值 MOV DI, 0
NEXT: MOV AX, DATA [SI]
CWD
ADD BX, AX ；求和 ADC DI, DX ；加上进位位 ADD SI, 2 LOOP NEXT MOV DX, DI ；将((DI),(BX))中的累加和放入((DX),(AX))中
MOV AX, BX MOV CX, 100H IDIV CX ；带符号数求平均值，放入(AX)中
MOV BX, 0 MOV SI, 0
COMP: CMP AX, DATA [SI] ；寻找小于平均值的数
JLE NO INC BX ；小于平均值数的个数+1
NO: ADD SI, 2
LOOP COMP RET
MAIN ENDP CSEG ENDS ；以上定义代码段
4
；--------------------------------------------------------------------------
END START
5.17 试编制一个程序把AX中的16进制数转换为ASCII码，并将对应的ASCII码依次存放
到MEM数组中的四个字节中。例如，当(AX)=2A49H时，程序执行完后，MEM中的4个字节内容为39H，34H，41H，32H。 答：程序如下：
DSEG SEGMENT MEM DB 4 DUP (?) N DW 2A49H DSEG ENDS
；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR
ASSUME CS: CSEG, DS: DSEG
START: PUSH DS ；设置返回DOS
SUB AX, AX PUSH AX
MOV AX, DSEG MOV DS, AX ；给DS赋值
BEGIN: MOV CH, 4 ；循环计数器
MOV CL, 4 MOV AX, N LEA BX, MEM
ROTATE:MOV DL, AL ；从最低四位开始转换为ASCII码
AND DL, 0FH ADD DL, 30H CMP DL, 3AH ；是0~9吗？（3 10H） JL NEXT ADD DL, 07H ；是A~F
NEXT: MOV [BX], DL ；转换的ASCII码送入MEM中 【表示DL存到BX所指的数组】
INC BX ROR AX, CL ；准备转换下一位 DEC CH JNZ ROTATE RET
MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------
END START 5.18 把0~100D之间的30个数存入以GRADE为首地址的30字数组中，GRADE+i表示学
号为i+1的学生的成绩。另一个数组RANK为30个学生的名次表，其中RANK+i的内容是学号为i+1的学生的名次。编写一程序，根据GRADE中的学生成绩，将学生名次
4
填入RANK数组中。(提示：一个学生的名次等于成绩高于这个学生的人数加1。) 答：程序如下：
DSEG SEGMENT GRADE DW 30 DUP (?) ；假设已预先存好30名学生的成绩 RANK DW 30 DUP (?) DSEG ENDS
；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR
ASSUME CS: CSEG, DS: DSEG
START: PUSH DS ；设置返回DOS
SUB AX, AX PUSH AX
MOV AX, DSEG MOV DS, AX ；给DS赋值
BEGIN: MOV DI, 0
MOV CX, 30 ；外循环计数器
LOOP1: PUSH CX
MOV CX, 30 ；内循环计数器 MOV SI, 0
MOV AX, GRADE [DI] ;一个学生的成绩 MOV DX, 1 ；起始名次为第1名
LOOP2: CMP GRADE [SI], AX ；成绩比较
JBE GO_ON INC DX ；名次+1
GO_ON: ADD SI, 2
LOOP LOOP2 POP CX
MOV RNAK [DI], DX ；名次存入RANK数组 ADD DI, 2 LOOP LOOP1 RET
MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------
END START 5.19 已知数组A包含15个互不相等的整数，数组B包含20个互不相等的整数。试编制一
程序把既在A中又在B中出现的整数存放于数组C中。 答：程序如下：
DSEG SEGMENT A DW 15 DUP (?) B DW 20 DUP (?) C DW 15 DUP (‘ ’)
4
DSEG ENDS
；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR
ASSUME CS: CSEG, DS: DSEG
START: PUSH DS ；设置返回DOS
SUB AX, AX PUSH AX
MOV AX, DSEG MOV DS, AX ；给DS赋值
BEGIN: MOV SI, 0
MOV BX, 0 MOV CX, 15 ；外循环计数器
LOOP1: PUSH CX
MOV CX, 20 ；内循环计数器 MOV DI, 0
MOV AX, A [SI] ；取A数组中的一个数
LOOP2: CMP B [DI], AX ；和B数组中的数相等吗？
JNE NO
MOV C [BX], AX ；相等存入C数组中 ADD BX, 2
NO: ADD DI, 2
LOOP LOOP2 ADD SI, 2 POP CX LOOP LOOP1 RET
MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------
END START
5.20 设在A、B和C单元中分别存放着三个数。若三个数都不是0，则求出三数之和存放在
D单元中；若其中有一个数为0，则把其它两单元也清0。请编写此程序。 答：程序如下：
DSEG SEGMENT A DW ? B DW ? C DW ? D DW 0 DSEG ENDS
；-------------------------------------------------------------------------- CSEG SEGMENT MAIN PROC FAR
4
编写程序
