Submission #3933007

Source Code Expand

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

Submission Info

Submission Time
Task C - Cheating Nim
User kotatsugame
Language Perl (v5.18.2)
Score 0
Code Size 93 Byte
Status WA
Exec Time 140 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 0 / 500
Status
AC × 2
AC × 10
WA × 16
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 3 ms 640 KB
001.txt AC 2 ms 384 KB
002.txt WA 90 ms 23164 KB
003.txt WA 68 ms 14116 KB
004.txt WA 55 ms 11272 KB
005.txt WA 35 ms 7192 KB
006.txt WA 133 ms 23152 KB
007.txt WA 135 ms 23152 KB
008.txt WA 136 ms 23152 KB
009.txt WA 137 ms 23152 KB
010.txt WA 137 ms 23152 KB
011.txt WA 135 ms 23152 KB
012.txt WA 134 ms 23152 KB
013.txt WA 140 ms 23152 KB
014.txt WA 135 ms 23152 KB
015.txt WA 133 ms 23152 KB
016.txt AC 133 ms 23152 KB
017.txt AC 137 ms 23152 KB
018.txt WA 138 ms 23152 KB
019.txt WA 134 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