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]]] for i in 0..