试题详情
简答题某场歌手赛，共有10个评委，试编写一程序，输入10个评分，去掉最高分和最低分，求平均分（均为BCD码）。
  • O.RG 0H
    N.EQU #5
    B.LOCK EQU #30H
    I.SELSORT： MOV R7，N
    D.EC R7
    M.OV R1，BLOCK
    I.SST1： MOV R0，BLOCK
    M.OV A，R7
    M.OV R6，A
    M.OV A，@R0
    M.OV B，A
    I.SST2： INC R1
    M.OV A，@R1
    C.LR C
    S.UBB A，B
    J.C ISST3
    M.OV A，@R1
    M.OV R2，A
    M.OV B，@R1
    I.SST3： DJNZ R6，ISST2
    M.OV A，B
    X.CH A，@R1
    M.OV B，R2
    M.OV @R1，B  MOV @R1，A
    D.JNZ R7，ISST1
    M.OV R0，BLOCK
    M.OV @R0，#0 ；去掉最低分
    M.OV A，BLOCK
    ADD A,#9  
    MOV R0,A 
    MOV @R0,#0 ;去掉最高分 
    AD: MOV R0,BLOCK  
    INC RO  
    MOV R1,#8  
    CLR A  
    CLR C  
    MOV B,#0 
    ADL: ADD A,@R0  
    DA A 
    MOV R2,A  
    ADDC A,#0 
    MOV B,A  
    MOV A,R2  
    DJNZ R1,ADL  
    MOV R5,0  
    MOV R4，B  
    MOV R3，A  
    MOV R2,#0  
    MOV R1，#8 
    R5R4R3/R2R1 = R4R3  
    MOV R1,#00H  
    MOV R2,#0FH  
    MOV R3,#04H  
    MOV R4,#05H  
    MOV R5,#06H  
    LCALL _DIV  
    AJMP $ 
    _DIV: ;{  
    CLR C  
    MOV 30H,#0  
    MOV 31H,#0  
    MOV 32H,#0 
    _DIV_LOOP: CLR C  
    MOV A,R3  
    SUBB A,R1 
    MOV R3,A  
    MOV A,R4  
    SUBB A,R2  
    MOV R4,A  
    MOV A,R5 
    SUBB A,#0  
    MOV R5,A  
    JC _DIV_END 
    _INC_SHANG: CLR C  
    MOV A,30H  
    ADDC A,#1  
    MOV 30H,A 
    MOV A,31H  
    ADDC A,#0  
    MOV 31H,A 
    MOV A,32H  
    ADDC A,#0  
    MOV 32H,A  
    LJMP _DIV_LOOP 
    _DIV_END: CLR C 
    MOV A,R1  
    ADDC A,R3  
    MOV A,R2  
    ADDC A,R4  
    MOV R3,30H  
    MOV R4,31H  
    END 

  • 关注下方微信公众号，在线模考后查看

热门试题