Вычисление выражения по формуле. - Assembler (223058)

LOCALS
 
.model small
 
.stack 100h
 
.data
        A       db      100
        R       dd      0
.code
 
main    proc
        mov     ax,     @data
        mov     ds,     ax
 
        mov     al,     A       ;bl=A-2
        sub     al,     2
        mov     bl,     al
 
        mov     al,     A       ;al=(A+6)
        add     al,     6
        mul     bl              ;bx=(A-2)*(A+6)
        mov     bx,     ax
 
        mov     al,     A       ;ax=A*4
        mov     ah,     0
        shl     ax,     1
        shl     ax,     1
 
        mul     bx              ;(dx:ax)=(A-2)*(A+6)*(A*4)
 
        mov     word ptr R,     ax
        mov     word ptr R+2,   dx
 
        mov     ax,     4C00h
        int     21h
main    endp
 
end     main