結果
問題 | No.154 市バス |
ユーザー | angel_p_57 |
提出日時 | 2016-06-10 22:40:44 |
言語 | Perl (5.38.2) |
結果 |
AC
|
実行時間 | 406 ms / 2,000 ms |
コード長 | 115 bytes |
コンパイル時間 | 31 ms |
コンパイル使用メモリ | 5,248 KB |
実行使用メモリ | 6,656 KB |
最終ジャッジ日時 | 2024-04-21 09:30:36 |
合計ジャッジ時間 | 3,314 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge4 |
(要ログイン)
テストケース
テストケース表示入力 | 結果 | 実行時間 実行使用メモリ |
---|---|---|
testcase_00 | AC | 389 ms
6,656 KB |
testcase_01 | AC | 388 ms
6,656 KB |
testcase_02 | AC | 394 ms
6,528 KB |
testcase_03 | AC | 377 ms
6,656 KB |
testcase_04 | AC | 406 ms
6,528 KB |
testcase_05 | AC | 3 ms
5,376 KB |
testcase_06 | AC | 3 ms
5,376 KB |
testcase_07 | AC | 375 ms
6,656 KB |
testcase_08 | AC | 3 ms
5,376 KB |
コンパイルメッセージ
Unquoted string "im" may clash with future reserved word at Main.pl line 1. Unquoted string "possible" may clash with future reserved word at Main.pl line 1. Main.pl syntax OK
ソースコード
<>;map{$$_++,$i||=$R<$G||$G<$W&&$W--&&!$G for reverse=~/./g;$i=$R=$G=$W=!print$i||$R-$G||$W<$R?im:"",possible,$/}<>