参考答案

编程如下：
主程序：
MAX EQU 30H
BLOCK1 EQU 40H
BLOCK2 EQU 60H
COMAX:MOV R1,#BLOCK1 ;取第一数据块首址
LCALL FMAX ;求第一数据块最大值(最大值→A)
MOV MAX，A ;暂存第一数据块最大值
MOV R1,#BLOCK2 ;取第二数据块首址
LCALL FMAX ;求第二数据块最大值(最大值→A)
CJNE A,MAX,NEXT ;比较两个数据块的最大值
NEXT:JNC NEXT1 ;C=0,MAX2≥MAX1
RET ;C=1,MAX2＜MAX1,MAX1→MAX
NEXTI:MOV MAX,A ;MAX2→MAX
RET ;
求数据块最大值子程序：
FMAX: MOV A,@R1 ;取数据块长度
MOV R2,A ;R2作计数器
CLR A ;准备作比较
FMLP: INC R1 ;指向下一个数据
CLR C ;准备作减法
SUBB A,@R1 ;用减法作比较
JNC FMLP1 ;A≥(R1)，转
MOV A,@R1 ;A＜(R1),(R1)→A
SJMP FMLP2 ;
FMLP1:ADD A,@R1 ;恢复A
FMLP2:DJNZ R2,FLMP ;判循环
RET ;