type vector=array[1..10000000] 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,m:longint;
    i,z:int64;
    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]:=10;
v[2]:=11;
i:=2;z:=1;
  repeat
   ok:=false;
   inc(i,2);
   if v[z] mod m=0 then begin ok:=true; write(v[z]);end
     else begin v[i-1]:=v[z]*10;v[i]:=v[z]*10+1;end;
   inc(z);
  until ok;
close(input);close(output);
end.