結果

問題 No.794 チーム戦 (2)
コンテスト
ユーザー ahe100
提出日時 2019-02-23 17:49:01
言語 C++11（廃止可能性あり）
(gcc 13.3.0)
結果
AC  
実行時間 98 ms / 1,500 ms
コード長 899 bytes
コンパイル時間 759 ms
コンパイル使用メモリ 83,248 KB
実行使用メモリ 6,656 KB
最終ジャッジ日時 2024-11-30 13:34:52
合計ジャッジ時間 3,401 ms
ジャッジサーバーID
（参考情報） 		judge5 / judge4
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 32
権限があれば一括ダウンロードができます

ソースコード

diff # 

#include<cstdio>
#include<cstring>
#include<vector>
#include<queue>
#include<stack>
#include<algorithm>
#include<cmath>
#include<climits>
#include<string>
#include<set>
#include<unordered_set>
#include<numeric>
#include<map>
#include<iostream>
using namespace std;
#define rep(i,n) for(int i = 0;i<((int)(n));i++)
#define reg(i,a,b) for(int i = ((int)(a));i<=((int)(b));i++)
#define irep(i,n) for(int i = ((int)(n)-1);i>=0;i--)
#define ireg(i,a,b) for(int i = ((int)(b));i>=((int)(a));i--)
typedef long long ll;
typedef pair<ll, ll> mp;
ll mod = 1e9+7;
ll inf = 1e18;

/*
ソートして尺取
*/

ll n,k,a[200010],b[200010],ans=1,r;

int main(void){
	cin>>n>>k;
	rep(i,n)cin>>a[i];
	//
	sort(a,a+n);
	r=n-1;
	//
	rep(i,n){
		while(r>=0 && a[i]+a[r]>k)r--;
		b[i]=min(r+1,(ll)i);
	}
	// rep(i,n)cout<<b[i]<<endl;
	reg(i,1,n/2){
		ans = (ans * (b[n-i]-(i-1))) % mod;
	}
	cout<<ans<<endl;
	return 0;
}
0