結果

問題 No.860 買い物
ユーザー tails
提出日時 2019-08-13 15:58:01
言語 Perl
(5.16.3)
結果
AC  
実行時間 566 ms
コード長 65 Byte
コンパイル時間 14 ms
使用メモリ 17,060 KB
最終ジャッジ日時 2019-08-13 15:58:15

テストケース

テストケース表示
入力 結果 実行時間
使用メモリ
sample1.txt AC 4 ms
6,872 KB
sample2.txt AC 3 ms
6,868 KB
sample3.txt AC 3 ms
6,872 KB
test1.txt AC 3 ms
6,868 KB
test2.txt AC 4 ms
6,868 KB
test3.txt AC 3 ms
6,872 KB
test4.txt AC 24 ms
6,868 KB
test5.txt AC 540 ms
17,052 KB
test6.txt AC 561 ms
17,048 KB
test7.txt AC 563 ms
17,052 KB
test8.txt AC 542 ms
17,056 KB
test9.txt AC 467 ms
17,052 KB
test10.txt AC 501 ms
17,052 KB
test11.txt AC 545 ms
17,052 KB
test12.txt AC 566 ms
17,056 KB
test13.txt AC 413 ms
17,060 KB
test14.txt AC 536 ms
17,052 KB
test15.txt AC 478 ms
17,048 KB
テストケース一括ダウンロード
コンパイルメッセージ
Name "main::i" used only once: possible typo at Main.pl line 1.
Main.pl syntax OK

ソースコード

diff #
map$a=-$\+!($\=(++$i-2&&$'-$a<$\?$'-$a:$\)+$`),(/ /)x2for<>;print
0