program alex;
var f:text;
    a,b,x,y,r,m,n,s,p,i:int64;
    e:boolean;
begin
assign(f,'multiplu.in');reset(f);
readln(f,a,b);
close(f);
x:=a;
y:=b;
r:=x mod y;
while r<>0 do
      begin
      x:=y;
      y:=r;
      r:=x mod y;
      end;
m:=(a*b) div y;
e:=false;
i:=0;
repeat
i:=i+1;
n:=i;
s:=0;
p:=1;
while n<>0 do
      begin
      r:=n mod 2;
      s:=s+r*p;
      n:=n div 2;
      p:=p*10;
      end;
if s mod m=0 then e:=true;
until e=true;
assign(f,'multiplu.out');rewrite(f);
writeln(f,s);
close(f);
end.