結果
問題 | No.527 ナップサック容量問題 |
ユーザー | %20 |
提出日時 | 2018-05-31 21:13:05 |
言語 | Perl (5.38.2) |
結果 |
AC
|
実行時間 | 877 ms / 2,000 ms |
コード長 | 128 bytes |
コンパイル時間 | 83 ms |
コンパイル使用メモリ | 5,220 KB |
実行使用メモリ | 10,192 KB |
最終ジャッジ日時 | 2023-09-12 21:08:14 |
合計ジャッジ時間 | 10,493 ms |
ジャッジサーバーID (参考情報) |
judge14 / judge15 |
(要ログイン)
テストケース
テストケース表示入力 | 結果 | 実行時間 実行使用メモリ |
---|---|---|
testcase_00 | AC | 3 ms
4,624 KB |
testcase_01 | AC | 4 ms
4,668 KB |
testcase_02 | AC | 3 ms
4,556 KB |
testcase_03 | AC | 4 ms
4,896 KB |
testcase_04 | AC | 2 ms
4,628 KB |
testcase_05 | AC | 149 ms
6,892 KB |
testcase_06 | AC | 648 ms
9,756 KB |
testcase_07 | AC | 415 ms
8,544 KB |
testcase_08 | AC | 105 ms
6,388 KB |
testcase_09 | AC | 3 ms
4,492 KB |
testcase_10 | AC | 628 ms
9,436 KB |
testcase_11 | AC | 270 ms
7,416 KB |
testcase_12 | AC | 163 ms
6,980 KB |
testcase_13 | AC | 725 ms
9,984 KB |
testcase_14 | AC | 111 ms
6,832 KB |
testcase_15 | AC | 249 ms
7,756 KB |
testcase_16 | AC | 3 ms
4,652 KB |
testcase_17 | AC | 147 ms
6,812 KB |
testcase_18 | AC | 199 ms
7,356 KB |
testcase_19 | AC | 5 ms
4,864 KB |
testcase_20 | AC | 94 ms
6,328 KB |
testcase_21 | AC | 808 ms
9,840 KB |
testcase_22 | AC | 430 ms
8,740 KB |
testcase_23 | AC | 659 ms
9,200 KB |
testcase_24 | AC | 42 ms
5,904 KB |
testcase_25 | AC | 331 ms
7,944 KB |
testcase_26 | AC | 290 ms
7,828 KB |
testcase_27 | AC | 320 ms
8,140 KB |
testcase_28 | AC | 248 ms
7,916 KB |
testcase_29 | AC | 877 ms
10,192 KB |
testcase_30 | AC | 2 ms
4,596 KB |
testcase_31 | AC | 4 ms
4,520 KB |
testcase_32 | AC | 4 ms
4,540 KB |
testcase_33 | AC | 4 ms
4,568 KB |
testcase_34 | AC | 5 ms
4,640 KB |
testcase_35 | AC | 265 ms
7,792 KB |
testcase_36 | AC | 4 ms
4,744 KB |
testcase_37 | AC | 157 ms
7,064 KB |
testcase_38 | AC | 200 ms
7,444 KB |
testcase_39 | AC | 193 ms
7,164 KB |
コンパイルメッセージ
Unquoted string "a" may clash with future reserved word at Main.pl line 1. Unquoted string "c" may clash with future reserved word at Main.pl line 1. Unquoted string "inf" may clash with future reserved word at Main.pl line 1. Main.pl syntax OK
ソースコード
<>;($v,$w)=split,map$w?$@[$_+$w]+=$-=$@[$_]+$v-$@[$_+$w]:(${(a..c)[$@[$_]<=>$v]}=$_-1),sort{1}0..@@for<>;print$a+1||1,$/,$b||inf