Program sumdiv;
var a,b,i,sum,s:longint;
    f,q:text;
function pow(a,b:longint):longint;
begin
        if b=0 then pow:=1
        else if b=1 then pow:=a
        else if b mod 2=0 then pow:=pow( ((a mod 9901) * (a mod 9901)) mod 9901, b div 2)
        else pow:=((pow( ((a mod 9901) * (a mod 9901)) mod 9901, (b-1) div 2) mod 9901) * (a mod 9901)) mod 9901;
end;
begin
assign(f,'sumdiv.in');
reset(f);
assign(q,'sumdiv.out');
rewrite(q);
readln(f,a,b);
sum:=pow(a,b);
s:=1+sum;
for i:=2 to sum div 2 do if sum mod i=0 then s:=s+i;
writeln(q,s mod 9901);
close(f);
close(q);
end.