.686
.MODEL FLAT, C
.STACK
.data
extern a:byte, b:byte, d:byte, shisl:dword, znam:word, rez:word
.code
funk PROC
;----(22/d+3*b)/36-a*d/3)

;-------------shisl----------------------

mov bx,ax
mov al,3
mul b

mov ax,22
div d
cbw

add ax,bx
cwd

mov word ptr shisl,ax
;------------------znam-----------------
mov al,a
imul b

mov bl,3
div bl
cbw

mov bx,ax
mov ax,36
sub ax,bx
cwd

mov word ptr znam, ax
mov word ptr znam+2, dx
;------------------rez------------------

mov ax, word ptr shisl
mov dx, word ptr shisl+2
div znam

cwd
mov word ptr rez, ax
mov word ptr rez+2, dx

ret
funk ENDP
END