zoukankan      html  css  js  c++  java
  • Lucas定理

    对于C(n, m) mod p。这里的n,m,p(p为素数)都很大的情况。就不能再用C(n, m) = C(n - 1,m) + C(n - 1, m - 1)的公式递推了。

    于是就得到了Lucas定理:C(n,m)%p=C(n/p,m/p)*C(n%p,m%p)%p

    根据费马小定理

    已知(a, p) = 1,则 ap-1 ≡ 1 (mod p),  所以 a*ap-2 ≡ 1 (mod p)。

    也就是 (m!(n-m)!)的逆元为 (m!(n-m)!)p-2 ;

    所以就用快速幂就可以解决了,也可以用扩展欧几里得算法,也可以了。

    typedef long long LL;
    using namespace std;
    
    LL exp_mod(LL a, LL b, LL p) {
        LL res = 1;
        while(b != 0) {
            if(b&1) res = (res * a) % p;
            a = (a*a) % p;
            b >>= 1;
        }
        return res;
    }
    
    LL Comb(LL a, LL b, LL p) {
        if(a < b)   return 0;
        if(a == b)  return 1;
        if(b > a - b)   b = a - b;
    
        LL ans = 1, ca = 1, cb = 1;
        for(LL i = 0; i < b; ++i) {
            ca = (ca * (a - i))%p;
            cb = (cb * (b - i))%p;
        }
        ans = (ca*exp_mod(cb, p - 2, p)) % p;
        return ans;
    }
    
    LL Lucas(int n, int m, int p) {
         LL ans = 1;
    
         while(n&&m&&ans) {
            ans = (ans*Comb(n%p, m%p, p)) % p;
            n /= p;
            m /= p;
         }
         return ans;
    }
    
    int main() {
        Read();
        int n, m, p;
        while(~scanf("%d%d%d", &n, &m, &p)) {
            printf("%lld
    ", Lucas(n, m, p));
        }
        return 0;
    }

    这是一个费马小定理的代码

  • 相关阅读:
    生成 n 位验证码的函数
    delphi的procedure of object
    delphi 文本 记录 流式 读写文件
    delphi save .dfm to .txt
    delphi xml
    delphi json
    delphi http server
    dac FDMemTable
    dac oracle
    dac mssql server
  • 原文地址:https://www.cnblogs.com/fengzhiyuan/p/7411075.html
Copyright © 2011-2022 走看看