Submission #3380283


Source Code Expand

main=getLine>>=putStr.(\[a,b]->if abs(a-b)<2 then"Brown"else"Alice").map read.words

Submission Info

Submission Time
Task D - Alice&Brown
User kotatsugame
Language Haskell (GHC 7.10.3)
Score 500
Code Size 83 Byte
Status AC
Exec Time 2 ms
Memory 508 KB

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 500 / 500
Status
AC × 4
AC × 24
Set Name Test Cases
Sample 00-00.txt, 00-01.txt, 00-02.txt, 00-03.txt
All 00-00.txt, 00-01.txt, 00-02.txt, 00-03.txt, 01-00.txt, 01-01.txt, 01-02.txt, 01-03.txt, 01-04.txt, 01-05.txt, 01-06.txt, 01-07.txt, 01-08.txt, 01-09.txt, 01-10.txt, 01-11.txt, 01-12.txt, 01-13.txt, 01-14.txt, 01-15.txt, 01-16.txt, 01-17.txt, 01-18.txt, 01-19.txt
Case Name Status Exec Time Memory
00-00.txt AC 1 ms 508 KB
00-01.txt AC 2 ms 508 KB
00-02.txt AC 2 ms 508 KB
00-03.txt AC 1 ms 508 KB
01-00.txt AC 1 ms 508 KB
01-01.txt AC 1 ms 508 KB
01-02.txt AC 1 ms 508 KB
01-03.txt AC 1 ms 508 KB
01-04.txt AC 1 ms 508 KB
01-05.txt AC 1 ms 508 KB
01-06.txt AC 1 ms 508 KB
01-07.txt AC 1 ms 508 KB
01-08.txt AC 1 ms 508 KB
01-09.txt AC 1 ms 508 KB
01-10.txt AC 1 ms 508 KB
01-11.txt AC 1 ms 508 KB
01-12.txt AC 1 ms 508 KB
01-13.txt AC 1 ms 508 KB
01-14.txt AC 1 ms 508 KB
01-15.txt AC 1 ms 508 KB
01-16.txt AC 1 ms 508 KB
01-17.txt AC 1 ms 508 KB
01-18.txt AC 1 ms 508 KB
01-19.txt AC 1 ms 508 KB