結果

問題 No.829 成長関数インフレ中
ユーザー Pachicobue
提出日時 2018-12-06 06:18:01
言語 C++17
(gcc 13.3.0 + boost 1.87.0)
結果
AC  
実行時間 81 ms / 2,000 ms
コード長 1,458 bytes
コンパイル時間 686 ms
コンパイル使用メモリ 79,360 KB
最終ジャッジ日時 2025-01-06 18:23:49
ジャッジサーバーID
(参考情報)
judge2 / judge3
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
other AC * 22
権限があれば一括ダウンロードができます

ソースコード

diff #

#include <iostream>
#include <vector>
#include <algorithm>
using ll = long long;
constexpr ll MOD = 1000000007;
template <typename T>
constexpr std::pair<T, T> extgcd(const T a, const T b)
{
    if (b == 0) { return std::pair<T, T>{1, 0}; }
    const auto p = extgcd(b, a % b);
    return {p.second, p.first - p.second * (a / b)};
}
template <typename T>
constexpr T inverse(const T a, const T mod = MOD) { return (mod + extgcd(a, mod).first % mod) % mod; }
int main()
{
    std::cin.tie(0);
    std::ios::sync_with_stdio(false);
    int N;
    std::cin >> N;
    ll P;
    std::cin >> P;
    std::vector<ll> fact(2 * N + 1, 1), inv(2 * N + 1, 1);
    for (ll i = 2; i <= 2 * N; i++) { fact[i] = (fact[i - 1] * i) % MOD, inv[i] = ((MOD - MOD / i) * inv[MOD % i]) % MOD; }
    for (int i = 1; i <= 2 * N; i++) { (inv[i] *= inv[i - 1]) %= MOD; }
    std::vector<int> R(N, 0);
    for (int i = 0, a; i < N; i++) { std::cin >> a, R[a]++; }
    ll ans = P, sum = 0;
    int zero = 0;
    for (int i = N - 1, k = 0; i >= 0; k += R[i], i--) {
        const int r = R[i];
        if (r == 0) { continue; }
        const ll Q = (P * r + k) % MOD;
        if (Q == 0) {
            sum = (r * fact[r + k - 1] % MOD) * inv[k] % MOD, zero++;
        } else {
            (sum += r * inverse(Q) % MOD) %= MOD;
            (((ans *= fact[r + k - 1] * inv[k] % MOD) %= MOD) *= Q) %= MOD;
        }
    }
    std::cout << (zero >= 2 ? 0LL : ans * sum % MOD) << std::endl;
}
0