結果

問題 No.794 チーム戦 (2)
ユーザー saksak
提出日時 2020-07-21 21:49:12
言語 C++17
(gcc 13.3.0 + boost 1.87.0)
結果
WA  
実行時間 -
コード長 1,449 bytes
コンパイル時間 2,192 ms
コンパイル使用メモリ 199,720 KB
最終ジャッジ日時 2025-01-12 01:37:24
ジャッジサーバーID
（参考情報） 		judge4 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 9 WA * 23
権限があれば一括ダウンロードができます

ソースコード

diff # 

#include <bits/stdc++.h>

using namespace std;
typedef long long ll;
typedef pair<ll, ll> p_ll;

template<class T>
void debug(T itr1, T itr2) { auto now = itr1; while(now<itr2) { cout << *now << " "; now++; } cout << endl; }
#define repr(i,from,to) for (ll i=(ll)from; i<(ll)to; i++)
#define all(vec) vec.begin(), vec.end()
#define rep(i,N) repr(i,0,N)
#define per(i,N) for (int i=(int)N-1; i>=0; i--)

const ll MOD = pow(10,9)+7;
const ll LLINF = pow(2,61)-1;
const int INF = pow(2,30)-1;

vector<ll> fac;
void c_fac(int x=pow(10,6)+10) { fac.resize(x,true); rep(i,x) fac[i] = i ? (fac[i-1]*i)%MOD : 1; }
ll inv(ll a, ll m=MOD) { ll b = m, x = 1, y = 0; while (b!=0) { int d = a/b; a -= b*d; swap(a,b); x -= y*d; swap(x,y); } return (x+m)%m; }
ll nck(ll n, ll k) { return fac[n]*inv(fac[k]*fac[n-k]%MOD)%MOD; }
ll gcd(ll a, ll b) { if (a<b) swap(a,b); return b==0 ? a : gcd(b, a%b); }
ll lcm(ll a, ll b) { return a/gcd(a,b)*b; }


int main() {
  ll N, K; cin >> N >> K;
  ll A[N]; rep(i,N) cin >> A[i]; sort(A,A+N);
  ll p = upper_bound(A,A+N,K/2) - A;
  ll ok[N]; rep(i,N) ok[i] = upper_bound(A,A+N,K-A[i]) - A;

  // cout << p << endl; debug(ok, ok+N);

  c_fac();
  ll result = 1;
  if (p*2>=N) {
    for (ll i=N-1; i>=p; i--) result = result * (ok[i]-(i-(N-1))) % MOD;
    rep(i,(p*2-N)/2) result = result * nck(p*2-N-i*2,2) % MOD;
    result = result * inv(fac[(p*2-N)/2]) % MOD;
  }
  else result = 0;

  cout << result << endl;
  return 0;
}
0