Submission #2384186

Source Code Expand

import Data.Char

main :: IO ()
main = getChar >>= print . succ . subtract (ord 'A') . ord

Submission Info

Submission Time
Task A - A
User rusconn
Language Haskell (GHC 7.10.3)
Score 100
Code Size 93 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