結果

問題 No.1825 Except One
コンテスト
ユーザー siman
提出日時 2022-01-31 08:10:48
言語 Ruby
(4.0.1)
コンパイル:
ruby -w -c _filename_
実行:
ruby _filename_
結果
AC  
実行時間 518 ms / 3,000 ms
コード長 504 bytes
記録
記録タグの例:
初AC ショートコード 純ショートコード 純主流ショートコード 最速実行時間
コンパイル時間 192 ms
コンパイル使用メモリ 9,088 KB
実行使用メモリ 218,880 KB
最終ジャッジ日時 2026-03-04 10:45:44
合計ジャッジ時間 7,459 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge2
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 4
other AC * 31
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #
raw source code 

N = gets.to_i
A = gets.split.map(&:to_i).sort

dp = Array.new(N + 1) {Array.new(102) { Array.new(5010, 0) } }
dp[0][0][0] = 1
ans = 0

A.each_with_index do |a, i|
  i.downto(0) do |j|
    (100 * i).downto(0) do |k|
      next if dp[i][j][k] == 0
      dp[i + 1][j][k] += dp[i][j][k]

      nk = k + a
      m = j

      if m > 0 && nk % m == 0
        c = nk / m

        if a <= c
          ans += dp[i][j][k]
        end
      end

      dp[i + 1][j + 1][nk] += dp[i][j][k]
    end
  end
end

puts ans
0