結果

問題 No.1825 Except One
ユーザー siman
提出日時 2022-01-31 08:10:48
言語 Ruby
(3.4.1)
結果
AC  
実行時間 771 ms / 3,000 ms
コード長 504 bytes
コンパイル時間 195 ms
コンパイル使用メモリ 7,552 KB
実行使用メモリ 216,064 KB
最終ジャッジ日時 2024-06-11 08:42:43
合計ジャッジ時間 10,582 ms
ジャッジサーバーID
(参考情報)
judge5 / judge4
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 4
other AC * 31
権限があれば一括ダウンロードができます
コンパイルメッセージ
Syntax OK

ソースコード

diff #

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