data segment
         x dw +31
	 y dw +67
	 r dw ?
	 w dw +45
data ends

code segment
        assume cs:code,ds:data

begain: mov ax, data
           mov ds,ax

	   mov dx,0
	   mov ax,y
	   add ax,6
	   mov bx,ax
	   mov ax,w
	   imul x
	   idiv bx
	   mov r,dx
	   mov num,ax

           lea dx, num
	   mov ah,9
	   int 21h

	   mov ah,4ch
	   int 21h

code ends
         end begain