END START
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 MOV
BEGIN:
AX, DSEG 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 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名学生的成绩 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 ;内循环计数器