結果

問題 No.130 XOR Minimax
ユーザー tailstails
提出日時 2017-01-08 21:45:07
言語 Perl
(5.38.2)
結果
MLE  
実行時間 -
コード長 121 bytes
コンパイル時間 301 ms
コンパイル使用メモリ 5,372 KB
実行使用メモリ 538,476 KB
最終ジャッジ日時 2023-08-22 18:18:03
合計ジャッジ時間 47,303 ms
ジャッジサーバーID
(参考情報)
judge12 / judge13
このコードへのチャレンジ
(要ログイン)

テストケース

テストケース表示
入力 結果 実行時間
実行使用メモリ
testcase_00 AC 1,724 ms
125,308 KB
testcase_01 AC 3 ms
4,612 KB
testcase_02 AC 3 ms
4,624 KB
testcase_03 AC 3 ms
4,604 KB
testcase_04 MLE -
testcase_05 MLE -
testcase_06 AC 2,850 ms
409,160 KB
testcase_07 AC 2,831 ms
401,100 KB
testcase_08 AC 4,023 ms
292,992 KB
testcase_09 AC 453 ms
63,468 KB
testcase_10 AC 709 ms
96,876 KB
testcase_11 AC 2,450 ms
343,444 KB
testcase_12 AC 210 ms
31,576 KB
testcase_13 AC 1,935 ms
274,032 KB
testcase_14 AC 3,399 ms
245,880 KB
testcase_15 AC 33 ms
6,620 KB
testcase_16 AC 2,369 ms
172,144 KB
testcase_17 AC 2,488 ms
178,764 KB
testcase_18 AC 2,690 ms
194,068 KB
testcase_19 AC 3,161 ms
231,288 KB
testcase_20 AC 1,545 ms
112,968 KB
testcase_21 AC 3,346 ms
243,620 KB
testcase_22 AC 715 ms
53,296 KB
testcase_23 AC 212 ms
18,564 KB
権限があれば一括ダウンロードができます
コンパイルメッセージ
Main.pl syntax OK

ソースコード

diff #

sub f{$=&&do{local($=,@0,@1)=$=-1;push@{$_>>$=&1},$_ for@_;@0*@1?1<<$=|(sort{$a-$b}f(@0),f(@1))[0]:&f}}<>;$/=$";print f<>
0