INCLUDE 'EMU8086.INC'
.MODEL SMALL
.STACK 100H
.DATA
    P DB ?
    Q DB ?
    S DB ?
    R DB ?
.CODE
MAIN PROC
    MOV AX,@DATA
    MOV DS,AX

    PRINT "Q: "
    MOV AH,1
    INT 21H
    MOV Q,AL
    PRINTN

    PRINT "R: "
    INT 21H
    MOV R,AL
    PRINTN


    PRINT "S: "
    INT 21H
    MOV S,AL
    PRINTN



    MOV AL,Q

     SUB AL,30H

    SUB R,30H

    MUL R

    SUB S,30H

    ADD AL,S

    MOV AH,0
    AAM

    MOV DL,AH
    MOV BL,AL
    ADD DL,30H
    MOV AH,2
    INT 21H

    MOV DL,BL
     ADD DL,30H
    INT 21H