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);
    for i:=0 to b do begin
    if i=1 then put:=1;
    if i>0 then
    put:=a*put;end;
    if (a>0)and(b=0) then a:=1 else a:=put;
    for put :=0 to a do
    if (put>=1)and(a mod put=0) then s:=s+put;
    write(g,s mod 9901);
    close(f);close(g);end.