Submission #3933014

Source Code Expand

<>;
!$h{$_}++&&$x&$_+1>>1&&($%++,$x^=$_)for sort{$b-$a}map{$x^=0+$_;$_^$_-1}<>;
print$x?-1:$%

Submission Info

Submission Time
Task C - Cheating Nim
User kotatsugame
Language Perl (v5.18.2)
Score 500
Code Size 95 Byte
Status AC
Exec Time 146 ms
Memory 23164 KB

Compile Error

Name "main::h" used only once: possible typo at ./Main.pl line 2.
./Main.pl syntax OK

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 500 / 500
Status
AC × 2
AC × 26
Set Name Test Cases
Sample example0.txt, example1.txt
All 000.txt, 001.txt, 002.txt, 003.txt, 004.txt, 005.txt, 006.txt, 007.txt, 008.txt, 009.txt, 010.txt, 011.txt, 012.txt, 013.txt, 014.txt, 015.txt, 016.txt, 017.txt, 018.txt, 019.txt, 020.txt, 021.txt, 022.txt, 023.txt, example0.txt, example1.txt
Case Name Status Exec Time Memory
000.txt AC 2 ms 384 KB
001.txt AC 2 ms 384 KB
002.txt AC 95 ms 23164 KB
003.txt AC 70 ms 14116 KB
004.txt AC 55 ms 11272 KB
005.txt AC 35 ms 7192 KB
006.txt AC 140 ms 23152 KB
007.txt AC 138 ms 23152 KB
008.txt AC 136 ms 23152 KB
009.txt AC 146 ms 23152 KB
010.txt AC 136 ms 23152 KB
011.txt AC 137 ms 23152 KB
012.txt AC 137 ms 23152 KB
013.txt AC 135 ms 23152 KB
014.txt AC 136 ms 23152 KB
015.txt AC 136 ms 23152 KB
016.txt AC 135 ms 23152 KB
017.txt AC 137 ms 23152 KB
018.txt AC 135 ms 23152 KB
019.txt AC 136 ms 23152 KB
020.txt AC 135 ms 23152 KB
021.txt AC 13 ms 2432 KB
022.txt AC 13 ms 2560 KB
023.txt AC 93 ms 23164 KB
example0.txt AC 2 ms 384 KB
example1.txt AC 2 ms 384 KB