var b,p,s,i,r,x,y,sq:longint;   f,g:text; a:real;
begin
assign(f,'sumdiv.in'); reset(f);
assign(g,'sumdiv.out'); rewrite(g);
read(f,a,b);
sq:=sqrt(a);
 if b=0 then s:=1
 else
  begin
   if p mod 2=0 then
      for i:=2 to b do
      p:=sq*sq;
   if p mod 2=1 then
     p:=sq*sq*a;
   end;
for i:=1 to d do
 if p mod i=0 then
 s:=s+i;
r:=s mod 9901;
writeln(g,r);
close(f); close(g);
end.