結果

問題 No.1238 選抜クラス
コンテスト
ユーザー yuly3
提出日時 2021-05-15 01:18:46
言語 Nim
(2.2.0)
結果
CE  
(最新)
AC  
(最初)
実行時間 -
コード長 1,143 bytes
コンパイル時間 1,504 ms
コンパイル使用メモリ 72,064 KB
最終ジャッジ日時 2024-11-15 01:04:57
合計ジャッジ時間 2,183 ms
ジャッジサーバーID
（参考情報） 		judge1 / judge5
このコードへのチャレンジ
（要ログイン）
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。（リジャッジ後のコンパイルエラーは公開されます）
ただし、clay言語の場合は開発者のデバッグのため、公開されます。

コンパイルメッセージ
/home/judge/data/code/Main.nim(16, 21) Error: type mismatch: got 'seq[int]' for 'inputInts()' but expected 'tuple'

ソースコード

diff # 

import
  algorithm, bitops, deques, heapqueue, math, macros, sets, sequtils,
  strformat, strutils, sugar, tables

proc input*(): string {.inline.} = stdin.readLine
proc inputs*(): seq[string] {.inline.} = stdin.readLine.split
proc inputInt*(): int {.inline.} = stdin.readLine.parseInt
proc inputInts*(): seq[int] {.inline.} = stdin.readLine.split.map(parseInt)
proc chmax*[T: SomeNumber](n: var T, m: T) {.inline.} = n = max(n, m)
proc chmin*[T: SomeNumber](n: var T, m: T) {.inline.} = n = min(n, m)
proc `%=`*[T: SomeInteger](n: var T, m: T) {.inline.} = n = floorMod(n, m)

when isMainModule:
  const MOD = 10^9 + 7
  var N, K: int
  (N, K) = inputInts()
  let A = inputInts()

  var
    dp: array[101, array[101, array[10001, int]]]
    acc: int
  for i in 0..<N:
    dp[i][0][0] = 1
    for j in 0..i:
      for k in 0..acc:
        dp[i + 1][j][k] += dp[i][j][k]
        dp[i + 1][j][k] %= MOD
        dp[i + 1][j + 1][k + A[i]] += dp[i][j][k]
        dp[i + 1][j + 1][k + A[i]] %= MOD
    acc += A[i]
  
  var ans: int
  for i in 1..N:
    for j in 0..10000:
      if i*K <= j:
        ans += dp[N][i][j]
        ans %= MOD
  echo ans
0