program zero2;
var n,b,i,j:longint;
g,f:text;
begin
 assign(g,'zero2.out'); assign(f,'zero2.in'); rewrite(g); reset(f);
 for i:=1 to 10 do
 begin
   read(f,n,b);
   for j:=2 to trunc(sqrt(b)) do
     if b mod j=0 then j:=b;
   if j=b then if b>n then writeln(g,'0')
                      else if b=n then writeln(g,'1')
                                  else writeln(g,'2')
          else if b>n then writeln(g,'0')
                      else writeln(g,'2');
 end;
 close(g);
end.