program p12;
var f,g: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;
    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.