type vector=array[1..1000000] of int64;

function cmmdc(a,b:longint):longint;
var r:longint;
begin
r:=a mod b;
  while r<>0 do begin
    a:=b;b:=r;r:=a mod b;
  end;
  cmmdc:=b;
end;
procedure scrie(v:vector;m:integer);
var i:integer;
begin
  for i:=1 to m do  write(v[i],' ');
end;

var a,b:longint;
    i,m,j,d,k:longint;
    v:vector;
    ok:boolean;
begin
assign(input,'multiplu.in');reset(input);
assign(output,'multiplu.out');rewrite(output);
readln(a,b);
m:=(a*b)div cmmdc(a,b);
v[1]:=1;
i:=1;
  repeat
   ok:=false;
     d:=i;
     inc(i,2*i);

       for j:=1 to d do v[j+d]:=v[j]*10;

       for j:=1 to d do v[j+(2*d)]:=v[j]*10+1;

     for j:=1 to d do
       if v[j] mod m=0 then begin write(v[j]);ok:=true;end;
       for k:=1 to d do begin
         for j:=1 to i-1 do v[j]:=v[j+1];dec(i);end;
    for j:=i+1 to i+d do v[j]:=0;
  until ok;
close(input);close(output);
end.