結果

問題 No.794 チーム戦 (2)
ユーザー siman
提出日時 2022-05-10 17:10:06
言語 Ruby
(3.4.1)
結果
WA  
実行時間 -
コード長 397 bytes
コンパイル時間 101 ms
コンパイル使用メモリ 7,552 KB
実行使用メモリ 30,848 KB
最終ジャッジ日時 2024-07-17 23:31:10
合計ジャッジ時間 9,786 ms
ジャッジサーバーID
(参考情報)
judge5 / judge2
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 3
other AC * 7 WA * 25
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

N, K = gets.split.map(&:to_i)
A = gets.split.map(&:to_i).sort
MOD = 10 ** 9 + 7

upper = A.select { |a| a > K / 2 }
lower = A.select { |a| a <= K / 2 }

ans = 1
ls = lower.size

upper.each_with_index do |a, i|
  lim = K - a
  idx = lower.bsearch_index { |b| lim < b } || lower.size

  ans *= (idx - i)
  ans = 0 if ans < 0
  ans %= MOD
  ls -= 1
end

ans *= ls * (ls - 1) / 2
ans %= MOD

puts ans
0