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