Submission #3933005


Source Code Expand

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

Submission Info

Submission Time
Task C - Cheating Nim
User kotatsugame
Language Perl (v5.18.2)
Score 0
Code Size 95 Byte
Status WA
Exec Time 133 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 × 4
WA × 22
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 WA 87 ms 23164 KB
003.txt WA 67 ms 14116 KB
004.txt WA 54 ms 11272 KB
005.txt WA 34 ms 7192 KB
006.txt WA 130 ms 23152 KB
007.txt WA 130 ms 23152 KB
008.txt WA 132 ms 23152 KB
009.txt WA 133 ms 23152 KB
010.txt WA 130 ms 23152 KB
011.txt WA 133 ms 23152 KB
012.txt WA 132 ms 23152 KB
013.txt WA 130 ms 23152 KB
014.txt WA 132 ms 23152 KB
015.txt WA 132 ms 23152 KB
016.txt WA 131 ms 23152 KB
017.txt WA 130 ms 23152 KB
018.txt WA 130 ms 23152 KB
019.txt WA 132 ms 23152 KB
020.txt WA 130 ms 23152 KB
021.txt WA 12 ms 2432 KB
022.txt WA 13 ms 2560 KB
023.txt WA 88 ms 23164 KB
example0.txt AC 2 ms 384 KB
example1.txt AC 2 ms 384 KB