Submission #1789928

Source Code Expand

import Data.Ix

main :: IO ()
main = do
    x <- getLine
    print $ index ('A', 'E') (head x) + 1

Submission Info

Submission Time
Task A - A
User atctk
Language Haskell (GHC 7.10.3)
Score 100
Code Size 105 Byte
Status AC
Exec Time 1 ms
Memory 380 KB

Judge Result

Set Name all
Score / Max Score 100 / 100
Status
AC × 5
Set Name Test Cases
all A.txt, B.txt, C.txt, D.txt, E.txt
Case Name Status Exec Time Memory
A.txt AC 1 ms 380 KB
B.txt AC 1 ms 380 KB
C.txt AC 1 ms 380 KB
D.txt AC 1 ms 380 KB
E.txt AC 1 ms 380 KB