結果
問題 | No.1031 いたずら好きなお姉ちゃん |
ユーザー | tails |
提出日時 | 2020-12-15 19:48:52 |
言語 | Perl (5.38.2) |
結果 |
AC
|
実行時間 | 724 ms / 3,500 ms |
コード長 | 223 bytes |
コンパイル時間 | 390 ms |
コンパイル使用メモリ | 6,136 KB |
実行使用メモリ | 32,440 KB |
最終ジャッジ日時 | 2023-10-20 06:26:54 |
合計ジャッジ時間 | 24,781 ms |
ジャッジサーバーID (参考情報) |
judge12 / judge15 |
(要ログイン)
テストケース
テストケース表示入力 | 結果 | 実行時間 実行使用メモリ |
---|---|---|
testcase_00 | AC | 8 ms
6,144 KB |
testcase_01 | AC | 7 ms
6,140 KB |
testcase_02 | AC | 8 ms
6,140 KB |
testcase_03 | AC | 30 ms
7,224 KB |
testcase_04 | AC | 26 ms
7,212 KB |
testcase_05 | AC | 26 ms
7,200 KB |
testcase_06 | AC | 26 ms
7,212 KB |
testcase_07 | AC | 26 ms
7,216 KB |
testcase_08 | AC | 25 ms
7,196 KB |
testcase_09 | AC | 27 ms
7,200 KB |
testcase_10 | AC | 26 ms
7,200 KB |
testcase_11 | AC | 454 ms
27,572 KB |
testcase_12 | AC | 406 ms
27,472 KB |
testcase_13 | AC | 518 ms
32,248 KB |
testcase_14 | AC | 418 ms
28,328 KB |
testcase_15 | AC | 455 ms
30,740 KB |
testcase_16 | AC | 387 ms
27,324 KB |
testcase_17 | AC | 464 ms
30,840 KB |
testcase_18 | AC | 439 ms
29,964 KB |
testcase_19 | AC | 465 ms
31,240 KB |
testcase_20 | AC | 502 ms
32,260 KB |
testcase_21 | AC | 445 ms
30,012 KB |
testcase_22 | AC | 397 ms
27,324 KB |
testcase_23 | AC | 408 ms
27,996 KB |
testcase_24 | AC | 467 ms
31,316 KB |
testcase_25 | AC | 480 ms
32,136 KB |
testcase_26 | AC | 459 ms
30,472 KB |
testcase_27 | AC | 424 ms
28,664 KB |
testcase_28 | AC | 498 ms
32,320 KB |
testcase_29 | AC | 481 ms
32,320 KB |
testcase_30 | AC | 479 ms
32,320 KB |
testcase_31 | AC | 474 ms
32,316 KB |
testcase_32 | AC | 483 ms
32,316 KB |
testcase_33 | AC | 484 ms
32,320 KB |
testcase_34 | AC | 281 ms
32,440 KB |
testcase_35 | AC | 721 ms
32,320 KB |
testcase_36 | AC | 634 ms
32,316 KB |
testcase_37 | AC | 724 ms
32,320 KB |
testcase_38 | AC | 663 ms
32,084 KB |
testcase_39 | AC | 640 ms
31,424 KB |
testcase_40 | AC | 630 ms
31,680 KB |
testcase_41 | AC | 679 ms
32,056 KB |
testcase_42 | AC | 634 ms
31,980 KB |
testcase_43 | AC | 629 ms
32,144 KB |
testcase_44 | AC | 611 ms
31,968 KB |
testcase_45 | AC | 615 ms
31,268 KB |
testcase_46 | AC | 686 ms
31,668 KB |
testcase_47 | AC | 634 ms
31,600 KB |
testcase_48 | AC | 506 ms
32,300 KB |
testcase_49 | AC | 701 ms
32,348 KB |
testcase_50 | AC | 646 ms
32,068 KB |
testcase_51 | AC | 511 ms
32,432 KB |
testcase_52 | AC | 513 ms
32,436 KB |
testcase_53 | AC | 518 ms
32,436 KB |
testcase_54 | AC | 7 ms
6,140 KB |
testcase_55 | AC | 8 ms
6,140 KB |
コンパイルメッセージ
Possible precedence problem on bitwise | operator at Main.pl line 4. Possible precedence problem on bitwise ^ operator at Main.pl line 7. Unquoted string "a" may clash with future reserved word at Main.pl line 11. Unquoted string "b" may clash with future reserved word at Main.pl line 11. Main.pl syntax OK
ソースコード
<>; @a=glob<>; map{ $x=$a[$i++]<$_|0; $y=$x^1; $%+=push@$x,$i-1; pop@$y while@$y&&$a[$$y[-1]]<$_^$y; if(@$y){ $j=$$y[-1]; $a=-1;$b=@$x; ${$$x[$c]<$j?a:b}=$c=$a+$b>>1while$a+1<$b; $%-=$b; } }@a[1..$#a]; print$%