This program finds the least commom multiple (LCM) of two numbers

                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    `____________LEAST COMMOM MULTIPLE MACHINE____________
`made on:9/24/2006 12:00:29 pm
`made by:Aamir Syed
`what it does: the LCM machine finds the least commom multiple of two numbers

cls

input "first # "; a
input "second # "; b

x = a
y = b

do
  
  if a = b then print "LCM = ";a : exit
  if a < b then a = a+x
  if a > b then b = b+y
  print a;",";b

loop

wait key