前言
扩展卢卡斯算法可以解决 C n m % m o d C_n^m \% mod Cnm%mod,mod 不是素数的问题
可以在 O ( m o d ( log m o d ) ) O(mod(\log mod)) O(mod(logmod))时间内处理 1 e 18 1e18 1e18 的 m 和 n
一、题目
题目链接 洛谷P4720
二、思路及代码
1.思路
可以利用中国剩余定理,只需求
(
m
n
)
≡
r
i
(
m
o
d
p
k
)
\dbinom{m}{n}\equiv r_i \pmod{p^k}
(nm)≡ri(modpk) 即可
利用威尔逊定理和逆元、快速幂的知识,转化为求:
n
!
q
x
m
!
q
y
(
n
−
m
)
!
q
z
q
x
−
y
−
z
(
m
o
d
q
k
)
\displaystyle \frac{\frac{n!}{q^x}}{\frac{m!}{q^y}\frac{(n-m)!}{q^z}}q^{x-y-z} \pmod{q^k}
qym!qz(n−m)!qxn!qx−y−z(modqk)
不是很好理解,留下板子即可
2.代码
代码如下:
#include <iostream>
#define int long long
using namespace std;
int n, m, mod;
int quickpow(int base, int x, int p) {
int ans = 1;
while (x) {
if (x & 1) ans = ans * base % p;
base = base * base % p;
x >>= 1;
}
return ans;
}
int exgcd(int a, int b, int &x, int &y) {
if (!b) {
x = 1;
y = 0;
return a;
}
int r = exgcd(b, a % b, x, y);
int t = x;
x = y;
y = t - a / b * y;
return r;
}
int inv(int a, int b) {
int x, y;
return exgcd(a, b, x, y) == 1 ? (x + b) % b : -1;
}
int CRT(int x, int ps) { return x * inv(mod / ps, ps) % mod * mod / ps % mod; }
int fac(int x, int ps, int p) { // ps = p ^ k
if (!x) return 1;
int res = 1;
for (int i = 2; i <= ps; i++)
if (i % p) res = res * i % ps;
res = quickpow(res, x / ps, ps);
for (int i = 2; i <= x % ps; i++)
if (i % p) res = res * i % ps;
return res * fac(x / p, ps, p) % ps; // 不含 p 的 x! % ps
}
int Comp(int n, int m, int ps, int p) { // ps = p ^ k, 返回组合数模 ps 的值
int fn = fac(n, ps, p), fm = fac(m, ps, p), fnm = fac(n - m, ps, p);
int k = 0;
for (int i = n; i; i /= p) k += i / p;
for (int i = m; i; i /= p) k -= i / p;
for (int i = n - m; i; i /= p) k -= i / p; // 推组合数中 p 的幂次(勒让德)
return fn * inv(fm, ps) % ps * inv(fnm, ps) % ps * quickpow(p, k, ps) % ps;
}
int exlucas(int n, int m) { // C_n^m % mod
int q = mod, ans = 0;
for (int i = 2; i * i <= mod; i++)
if (q % i == 0) {
int ps = 1;
while (q % i == 0) ps *= i, q /= i; // ps * q = mod, ps = i(p) ^ k
ans = (ans + CRT(Comp(n, m, ps, i), ps)) % mod;
}
if (q > 1) ans = (ans + CRT(Comp(n, m, q, q), q) % mod);
return ans % mod;
}
signed main() {
// freopen("in.txt", "r", stdin);
// freopen("out.txt", "w", stdout);
scanf("%lld%lld%lld", &n, &m, &mod);
printf("%lld\n", exlucas(n, m));
return 0;
}