結果
問題 |
No.4 おもりと天秤
|
ユーザー |
|
提出日時 | 2019-01-29 02:20:06 |
言語 | Nim (2.2.0) |
結果 |
WA
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 522 bytes |
コンパイル時間 | 2,368 ms |
コンパイル使用メモリ | 62,248 KB |
実行使用メモリ | 6,948 KB |
最終ジャッジ日時 | 2024-07-01 11:05:50 |
合計ジャッジ時間 | 3,220 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
other | WA * 23 |
ソースコード
import sequtils,math proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "<stdio.h>" .} proc scan(): int = while true: let k = getchar_unlocked() if k < '0': return result = 10 * result + k.ord - '0'.ord let n = scan() let W = newSeqWith(n,scan()) let wSum = W.sum() if wSum mod 2 == 1 : quit "impossible",0 let m = wSum div 2 var dp = newSeq[bool](m + 1) dp[0] = true for w in W: for i in countdown(m-w,0): if dp[i] : dp[i + w] = true if dp[m] : quit "possible",0 quit "impossible",0