49703100.doc - 28 - 作者：User
5.14 在首地址为TABLE的数组中按递增次序存放着100H个16位补码数，试编写一个程序把出现次
数最多的数及其出现次数分别存放于AX和CX中。 答：程序如下：
DSEG SEGMENT TABLE DW 100H DUP (?) ；数组中的数据是按增序排列的 DATA DW ? COUNT DW 0 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
NEXT: MOV DX, 0
MOV AX, TABLE [SI]
COMP: CMP TABLE [SI], AX ；计算一个数的出现次数
JNE ADDR INC DX ADD SI, 2 LOOP COMP
ADDR: CMP DX, COUNT ；此数出现的次数最多吗？
JLE DONE
MOV COUNT, DX ；目前此数出现的次数最多，记下次数 MOV DATA, AX ；记下此数
DONE: LOOP NEXT ；准备取下一个数
MOV CX, COUNT ；出现最多的次数存入(CX) MOV AX, DATA ；出现最多的数存入(AX) RET
MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------
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
49703100.doc - 29 - 作者：User
MOV
BEGIN:
DS, AX ；给DS赋值
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 ；以上定义代码段 ；--------------------------------------------------------------------------
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
49703100.doc - 30 - 作者：User
MOV SI, 0
COMP: CMP AX, DATA [SI] ；寻找小于平均值的数
JLE NO INC BX ；小于平均值数的个数+1
NO: ADD SI, 2
LOOP COMP RET
MAIN ENDP CSEG ENDS ；以上定义代码段 ；--------------------------------------------------------------------------
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吗？ JL NEXT ADD DL, 07H ；是A~F
NEXT: MOV [BX], DL ；转换的ASCII码送入MEM中
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中的学生成绩，将学生名次填入RANK数组中。(提示：一个学生的名次等于成绩高于这个学生的人数加1。) 答：程序如下：
DSEG SEGMENT GRADE DW 30 DUP (?) ；假设已预先存好30名学生的成绩
49703100.doc - 31 - 作者：User
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 (? ‘) 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