program legkisebb_kozostobbszoros; var a,b:word; function lkkt(x,y:word):word; var c,d:word; begin c:=x; d:=y; while x<>y do if x>y then x:=x-y else y:=y-x; lkkt:=c*d div x end; begin readln(a); readln(b); writeln(lkkt(a,b)); readln end.