[BZOJ 1951][Sdoi2010]古代猪文（Lucas+CRT+费马小定理）

Description

“在那山的那边海的那边有一群小肥猪。他们活泼又聪明，他们调皮又灵敏。他们自由自在生活在那绿色的大草坪，他们善良勇敢相互都关心……” ——选自猪王国民歌 很久很久以前，在山的那边海的那边的某片风水宝地曾经存在过一个猪王国。猪王国地理位置偏僻，实施的是适应当时社会的自给自足的庄园经济，很少与外界联系，商贸活动就更少了。因此也很少有其他动物知道这样一个王国。 猪王国虽然不大，但是土地肥沃，屋舍俨然。如果一定要拿什么与之相比的话，那就只能是东晋陶渊明笔下的大家想象中的桃花源了。猪王勤政爱民，猪民安居乐业，邻里和睦相处，国家秩序井然，经济欣欣向荣，社会和谐稳定。和谐的社会带给猪民们对工作火红的热情和对未来的粉色的憧憬。 小猪iPig是猪王国的一个很普通的公民。小猪今年10岁了，在大肥猪学校上小学三年级。和大多数猪一样，他不是很聪明，因此经常遇到很多或者稀奇古怪或者旁人看来轻而易举的事情令他大伤脑筋。小猪后来参加了全猪信息学奥林匹克竞赛(Pig Olympiad in Informatics, POI)，取得了不错的名次，最终保送进入了猪王国大学(Pig Kingdom University, PKU)深造。 现在的小猪已经能用计算机解决简单的问题了，比如能用P++语言编写程序计算出A + B的值。这个“成就”已经成为了他津津乐道的话题。当然，不明真相的同学们也开始对他刮目相看啦~ 小猪的故事就将从此展开，伴随大家两天时间，希望大家能够喜欢小猪。

题目描述：猪王国的文明源远流长，博大精深。 iPig在大肥猪学校图书馆中查阅资料，得知远古时期猪文文字总个数为N。当然，一种语言如果字数很多，字典也相应会很大。当时的猪王国国王考虑到如果修一本字典，规模有可能远远超过康熙字典，花费的猪力、物力将难以估量。故考虑再三没有进行这一项劳猪伤财之举。当然，猪王国的文字后来随着历史变迁逐渐进行了简化，去掉了一些不常用的字。 iPig打算研究古时某个朝代的猪文文字。根据相关文献记载，那个朝代流传的猪文文字恰好为远古时期的k分之一，其中k是N的一个正约数（可以是1和N）。不过具体是哪k分之一，以及k是多少，由于历史过于久远，已经无从考证了。 iPig觉得只要符合文献，每一种能整除N的k都是有可能的。他打算考虑到所有可能的k。显然当k等于某个定值时，该朝的猪文文字个数为N / k。然而从N个文字中保留下N / k个的情况也是相当多的。iPig预计，如果所有可能的k的所有情况数加起来为P的话，那么他研究古代文字的代价将会是G的P次方。 现在他想知道猪王国研究古代文字的代价是多少。由于iPig觉得这个数字可能是天文数字，所以你只需要告诉他答案除以999911659的余数就可以了。

Solution

要求的大概是这个东西 G^∑C(n,k) mod 999911659(k|n) 

999911659是个质数，所以根据费马小定理降幂可得 G^{∑C(n,k) mod 999911658} mod 999911659(k|n) 

（因为每p-1个G相乘都会得到1，可以看做欧拉定理的特殊形式）

999911658可以分解为4个质数，用Lucas分别求组合数以后再把它们用中国剩余定理合并起来

代码并没有想象那么难写

#include<iostream>
#include<cstring>
#include<cstdlib>
#include<cstdio>
#include<cmath>
using namespace std;
typedef  long long LL;
const int Mod=999911659;
int p[4]={2,3,4679,35617},fac[4][35620],finv[4][35620];
LL n,g;
void init()
{
    for(int i=0;i<4;i++)
    {
        fac[i][0]=1,finv[i][1]=1;
        for(int j=1;j<p[i];j++)
        fac[i][j]=(fac[i][j-1]*j)%p[i];
        for(int j=2;j<p[i];j++)
        finv[i][j]=((p[i]-p[i]/j)*finv[i][p[i]%j])%p[i];
        finv[i][0]=1;
        for(int j=1;j<p[i];j++)
        finv[i][j]=(finv[i][j-1]*finv[i][j])%p[i];
    }
}
LL pow(LL a,LL n,LL P)
{
    LL res=1;
    while(n)
    {
        if(n&1)res=(res*a)%P;
        a=(a*a)%P,n>>=1;
    }
    return res;
}
void exgcd(LL a,LL b,LL &d,LL &x,LL &y)
{
    if(!b)d=a,x=1,y=0;
    else exgcd(b,a%b,d,y,x),y-=x*(a/b);
}
LL inv(LL a,LL p)
{
    LL d,x,y;exgcd(a,p,d,x,y);
    return (x+p)%p;
}
LL lucas(LL m,LL n,LL i)
{
    if(m<n)return 0;
    if(m<p[i]&&n<p[i])return ((fac[i][m]*finv[i][n])%p[i]*finv[i][m-n])%p[i];
    else return lucas(m/p[i],n/p[i],i)*lucas(m%p[i],n%p[i],i);
}
LL C(LL m,LL n)
{
    LL res=0;
    for(int i=0;i<4;i++)
    {
        LL t=lucas(m,n,i);
        res+=(t*inv((Mod-1)/p[i],p[i]))%(Mod-1)*((Mod-1)/p[i])%(Mod-1);
        res%=(Mod-1);
    }
    return res;
}
LL solve()
{
    LL res=0;
    for(LL i=1;i<=sqrt(n+0.1);i++)
    if(n%i==0)
    {
        res+=C(n,i);
        if(i*i<n)res+=C(n,n/i);
    }
    return res;
}
int main()
{
    init();
    scanf("%lld%lld",&n,&g);
    printf("%lld",pow(g,solve(),Mod));
    return 0;
}