var fi,fo:text;
    p,n,i,a,b,max,ct:longint;
    sol:int64;
    nr:int64;
function valid:boolean;
begin
  if (sol<>0)and(sol mod a=0)and(sol mod b=0) then valid:=true
     else begin valid:=false; nr:=0; end;
end;
procedure back(k:integer);
var i,j,ok:integer;
begin
  ok:=0;
  if (k=p+1) then
   if valid=true then
     begin
       writeln(fo,sol);
       close(fo);
       halt; end
  else
   else
   begin
    for i:=0 to n-1 do
      begin
        sol:=sol*10+i;;
        back(k+1);

      end;
     sol:=0;
    end;
end;
procedure solv;
begin
  p:=18; n:=2;
  back(1);
end;
begin
  assign(fi,'multiplu.in'); reset(fi);
  assign(fo,'multiplu.out'); rewrite(fo);
  read(fi,a,b);
  close(fi);
  sol:=0;
  solv;
end.