program p12;   
var f,g,o:text;   
    i,a,b,s,q:longint;   
begin  
assign(f,'sumdiv.in');reset(f);   
assign(g,'sumdiv.out');rewrite(g);   
readln(f,a,b);   
q:=1;   
for i:=1 to b do  
    begin  
    q:=q*a;   
    if q>9901 then q:=q mod 9901;   
    end;   
    s:=1+q;   
for i:=2 to q div 2 do  
    if q mod i =0 then  
                  begin  
                  s:=s+(i mod 9901);   
                  if s>9901 then s:=s mod 9901;   
                  end;   
writeln(g,s);   
close(g);   
end.