; Върни в RAX най-малкото общо кратно (НОК) на числата в RDI и RSI

option prologue:none, epilogue:none
.code
lcmult	proc
_lcmult	proc
	MOV	RAX,RDI	; съхрани числото A
	MUL	RSI	; RDX:RAX = A * B
	CALL	GCD	; RDI = НОД(A, B)
	DIV	RDI	; RAX = A * B / НОД(A, B) = НОК
	RET		; (при деленето е възможно препълване, нищо че НОД > 0)
_lcmult	endp
lcmult	endp
include	gcdivis.s
end