program for3;
  var m,n,k, NOK: integer;
begin
  write(' m = '); readln(m);
  write(' n = '); readln(n);
for k:=m*n downto n do
    if (k mod m = 0) and (k mod n = 0) then NOK:=k;
  writeln(' NOK = ',NOK);
end.