Submission #3933010

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 95 Byte
Status WA
Exec Time 143 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 2 ms 384 KB
001.txt AC 2 ms 384 KB
002.txt WA 92 ms 23164 KB
003.txt WA 68 ms 14116 KB
004.txt WA 54 ms 11272 KB
005.txt WA 35 ms 7192 KB
006.txt WA 138 ms 23152 KB
007.txt WA 138 ms 23152 KB
008.txt WA 143 ms 23152 KB
009.txt WA 143 ms 23152 KB
010.txt WA 138 ms 23152 KB
011.txt WA 136 ms 23152 KB
012.txt WA 136 ms 23152 KB
013.txt WA 141 ms 23152 KB
014.txt WA 138 ms 23152 KB
015.txt WA 139 ms 23152 KB
016.txt AC 140 ms 23152 KB
017.txt AC 139 ms 23152 KB
018.txt WA 136 ms 23152 KB
019.txt WA 137 ms 23152 KB
020.txt AC 138 ms 23152 KB
021.txt AC 13 ms 2432 KB
022.txt AC 14 ms 2560 KB
023.txt AC 91 ms 23164 KB
example0.txt AC 2 ms 384 KB
example1.txt AC 2 ms 384 KB