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 ；以上定义代码段

；

-------------------------------------------------------------------------- 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