var a,b,m,n,nod:integer;
nok:real;
begin
read(a,b);
m:=a;
n:=b;
while m<>n do
  if m>n then m:=m-n 
  else n:=n-m;
nod:=n;
nok:=a*b/nod;
writeln('мнд = ',nod,' мнй = ',nok);
end.