Sumdiv（poj1845）

题意：求A^B的因子的和。

/*
  首先将A分解 A=p1^a1*p2^a2*...*pn*an
  A^B=p1^a1B*p2^a2B*...*pn*anB
  因子之和sum=(1+p1+p1^2+...+p1^a1B)*...*(1+pn+pn^2+...+pn*anB)
  套用等比数列的公式，再用逆元搞一下。
  求逆元：(a/b)mod m=amod(bm)/b
*/
#include<cstdio>
#include<iostream>
#define N 10010
#define mod 9901
#define lon long long
using namespace std;
int prime[N],f[N],num;
void get_prime(){
    for(int i=;i<N;i++){
        if(!f[i]) prime[++num]=i;
        for(int j=;j<=num;j++){
            if(i*prime[j]>=N) break;
            f[i*prime[j]]=;
            if(i%prime[j]) break;
        }
    }
}
lon msm(lon A,lon B,lon MOD){
    lon base=A,r=;
    while(B){
        if(B&) r=(r+base)%MOD;
        base=(base+base)%MOD;
        B>>=;
    }
    return r;
}
lon ksm(lon A,lon B,lon MOD){
    lon base=A,r=;
    while(B){
        if(B&) r=msm(r,base,MOD);
        base=msm(base,base,MOD);
        B>>=;
    }
    return r;
}
void solve(lon A,lon B){
    lon ans=;
    for(int i=;prime[i]*prime[i]<=A;i++){
        if(A%prime[i]==){
            int num=;
            while(A%prime[i]==){
                num++;
                A/=prime[i];
            }
            lon M=(prime[i]-)*mod;
            ans*=(ksm(prime[i],num*B+,M)+M-)/(prime[i]-);
            ans%=mod;
        }
    }
    if(A>){
        lon M=mod*(A-);
        ans*=(ksm(A,B+,M)+M-)/(A-);
        ans%=mod;
    }
    cout<<ans<<endl;
}
int main(){
    lon A,B;
    get_prime();
    while(cin>>A>>B)
        solve(A,B);
    return ;
}