model Small
.stack 100h
.data
k db 0
.code
start:
mov ax,@data
mov ds,ax
x = 18
ur makro x
mov ax,18
mul 5
add ax,32
mov k,ax
mo ax,x
mul x
mov bx,ax
mov ax,k
div bx
end m
if xle 18
ur x
end if
mov ah,04ch
int 21h
end