又一种思路，我帮别人完善了一下的。http://www.programfan.com/club/post-239368.html
DATA  SEGMENT
      TABLE  DB        0,1,4,9,16,25,36,49,64,81
        ASK  DB        0DH,0AH,'Please enter a nummble(0~9):',0DH,0AH,'$'
        SEV  DB        'Key (N/n) to close!$'
        ANS  DB        'THE RESULT IS:$'
        OVER  DB        0DH,0AH,'ERROR!',0DH,0AH,0AH,0DH,'$'
        DATA  ENDS
        CODE  SEGMENT
              ASSUME    CS:CODE,DS:DATA
      START:  MOV      AX,DATA
              MOV      DS,AX      ;将数据送入DS
        STA:  MOV      DX,OFFSET SEV          ;输出提示
              MOV      AH,9
              INT      21H
              MOV      DX,OFFSET ASK
              MOV      AH,9
              INT      21H
             
              MOV      AH,1        ;输入数字
              INT      21H
             
              CMP      AL,'N'      ;判断输入是否为“N/n”
              JZ        CLO        ;为“N/n”则跳转至CLO
              CMP      AL,'n'
              JZ        CLO
             
              CMP      AL,'9'      ;输入数字与9和0进行比较
              JA        OVE        ;当数大于9或小于0则转移至OVE
              CMP      AL,'0'
              JL        OVE
             
              SUB      AL,30H      ;将字符3转换成数字3
              MOV      BL,AL
             
              LEA      SI,TABLE    ;将指针指向TABLE段
             
              MOV      AH,2
              MOV      DL,13
              INT      21H        ;输出回车符
              MOV      DL,10
              INT      21H        ;输出换行符
             
              MOV      AH,0        ;将AH清零
              MOV      AL,[SI+BX]
              DIV      DL          ;将TABLE中的数据除以10
             
              MOV      CH,AH      ;把余数送入CH中暂存
              MOV      CL,AL
              CMP      AL,0        ;将商与0相比较
              JZ        AGI2        ;商为零则跳转至AGI不输出商
              LEA      DX,ANS
              MOV      AH,9
              INT      21H
             
              MOV      AL,CL
              ADD      AL,30H      ;不为零则将数字转换成字符
              MOV      DL,AL
              MOV      AH,2
              INT      21H        ;输出商
              JMP      AGI
        AGI2: LEA      DX,ANS
              MOV      AH,9
              INT      21H
        AGI: 
              MOV      AL,CH
              ADD      AL,30H
              MOV      DL,AL
              MOV      AH,2
              INT      21H        ;输出余数
              MOV      DL,13
              INT      21H        ;输出回车符
              MOV      DL,10
              INT      21H        ;输出换行符
              MOV      DL,13
              INT      21H        ;输出回车符
              MOV      DL,10
              INT      21H
              JMP      STA        ;循环
        OVE:  MOV      DX,OFFSET OVER          ;输出错误提示
              MOV      AH,9
              INT      21H
              JMP      STA
        CLO:  MOV      AH,4CH
              INT      21H        ;返回DOS
        CODE  ENDS
              END      START      ;整个程序结束