Submission #1455703


Source Code Expand

import Data.List

main = getLine >>= print . (\[g,p] -> div (g-p) 2) . map (pred . length) . group . sort . ("gp"++)

Submission Info

Submission Time
Task D - AtCoDeer and Rock-Paper
User aimy
Language Haskell (GHC 7.10.3)
Score 300
Code Size 118 Byte
Status AC
Exec Time 111 ms
Memory 13692 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 300 / 300
Status
AC × 2
AC × 25
Set Name Test Cases
Sample 0_000.txt, 0_001.txt
All 0_000.txt, 0_001.txt, 1_002.txt, 1_003.txt, 1_004.txt, 1_005.txt, 1_006.txt, 1_007.txt, 1_008.txt, 1_009.txt, 1_010.txt, 1_011.txt, 1_012.txt, 1_013.txt, 1_014.txt, 1_015.txt, 1_016.txt, 1_017.txt, 1_018.txt, 1_019.txt, 1_020.txt, 1_021.txt, 1_022.txt, 1_023.txt, 1_024.txt
Case Name Status Exec Time Memory
0_000.txt AC 1 ms 380 KB
0_001.txt AC 1 ms 380 KB
1_002.txt AC 111 ms 13692 KB
1_003.txt AC 62 ms 8572 KB
1_004.txt AC 110 ms 12668 KB
1_005.txt AC 56 ms 7548 KB
1_006.txt AC 109 ms 12668 KB
1_007.txt AC 6 ms 2172 KB
1_008.txt AC 108 ms 11644 KB
1_009.txt AC 108 ms 11644 KB
1_010.txt AC 105 ms 11644 KB
1_011.txt AC 61 ms 7548 KB
1_012.txt AC 99 ms 10620 KB
1_013.txt AC 8 ms 2428 KB
1_014.txt AC 103 ms 10620 KB
1_015.txt AC 77 ms 8572 KB
1_016.txt AC 104 ms 10620 KB
1_017.txt AC 96 ms 9596 KB
1_018.txt AC 100 ms 9596 KB
1_019.txt AC 3 ms 1148 KB
1_020.txt AC 95 ms 9596 KB
1_021.txt AC 77 ms 8572 KB
1_022.txt AC 29 ms 8572 KB
1_023.txt AC 26 ms 7804 KB
1_024.txt AC 62 ms 8572 KB