LCM OF TWO NUMBERS


.model small
.stack 64
.data
VALUE DW 0025,0015
LCM DW 2 DUP(?)
.code
start: MOV AX,@DATA
       MOV DS,AX
       MOV DX,0
       MOV AX,VALUE
       MOV BX,VALUE+2
again: PUSH AX
       PUSH DX
       DIV BX
       CMP DX,0
       JE last
       POP DX
       POP AX
       ADD AX,VALUE
       JNC next
       INC DX
next:  JMP again
last:  POP LCM+2
       POP LCM
       MOV BX,LCM+2
       MOV AX,LCM
       END start
.end