結果
問題 | No.2669 Generalized Hitting Set |
ユーザー |
|
提出日時 | 2024-01-16 21:55:32 |
言語 | Nim (2.2.0) |
結果 |
AC
|
実行時間 | 1,822 ms / 4,000 ms |
コード長 | 1,555 bytes |
コンパイル時間 | 3,303 ms |
コンパイル使用メモリ | 66,268 KB |
実行使用メモリ | 136,576 KB |
最終ジャッジ日時 | 2024-09-28 03:03:32 |
合計ジャッジ時間 | 25,225 ms |
ジャッジサーバーID (参考情報) |
judge5 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | AC * 41 |
コンパイルメッセージ
/home/judge/data/code/Main.nim(3, 8) Warning: imported and not used: 'algorithm' [UnusedImport]
ソースコード
import sequtilsimport strutilsimport algorithmconst N_MAX: int = 24const HALF_N_MAX: int = (N_MAX + 1) div 2const MASK_HALF_N_MAX = (1 shl HALF_N_MAX) - 1var binom: array[N_MAX + 1, array[N_MAX + 1, int]]for i in 0 .. N_MAX:binom[i][0] = 1for j in 1 .. i:binom[i][j] = binom[i - 1][j - 1] + binom[i - 1][j]var popcnt: array[1 shl HALF_N_MAX, int]for t in 1 ..< 1 shl HALF_N_MAX:popcnt[t] = 1 + popcnt[t and (t - 1)]var n, m, k: intvar nmk = stdin.readLine.split.map parseIntn = nmk[0]m = nmk[1]k = nmk[2]var f = newSeq[int](1 shl n)for i in 0 ..< m:# reversed, but it's oklet s = stdin.readLinevar x = 0for j in 0 ..< n:x += int(s[j] == '1') shl jf[x] += 1var a = newSeq[int](n + 1)for l in k .. n:a[l] = binom[l - 1][l - k]if bool((l - k) and 1):a[l] = -a[l]# supset zetavar b1 = 1while b1 < 1 shl n:for l in countup(0, (1 shl n) - 1, 2 * b1):for p in l ..< l + b1:f[p] += f[p + b1]b1 *= 2for t in 0 ..< 1 shl n:f[t] *= a[popcnt[t shr HALF_N_MAX] + popcnt[t and MASK_HALF_N_MAX]]# subset zetavar b2 = 1while b2 < 1 shl n:for l in countup(0, (1 shl n) - 1, 2 * b2):for p in l ..< l + b2:f[p + b2] += f[p]b2 *= 2var g = newSeq[int](m + 1)for i in 0 .. m:g[i] = nfor t in 0 ..< 1 shl n:g[f[t]] = min(g[f[t]], popcnt[t shr HALF_N_MAX] + popcnt[t and MASK_HALF_N_MAX])for p in countdown(m - 1, 0):g[p] = min(g[p], g[p + 1])for p in 1 .. m:echo g[p]