var f,g:text;
  x,y,a,b:longint;
  ok:boolean;
 {---------------}
 function verif(n:longint):boolean;
 var i:byte;
 begin
 verif:=true;
    while n <> 0 do begin
              if (n mod 10 > 1) then begin verif:=false; break end;
               n:= n div 10 ;
                    end;

 end;
 {----------------}
begin
assign(f,'multiplu.in');
assign(g,'multiplu.out');
rewrite(g);
reset(f);
readln(f,x,y);
a:=x;
b:=y;
ok := true;
while ok do begin
      if a < b then a := a+x else
      if a > b then b := b+y else
      if a = b then
             if verif(a) then break else
                         a:=a+x;
             end;

writeln(g,a);
close(f);
close(g);
end.