Submission #1771019


Source Code Expand

import Data.Char

main :: IO ()
main = do
    (s:ss) <- getLine
    putStrLn $ toUpper s : map toLower ss

Submission Info

Submission Time
Task B - 名前の確認
User atctk
Language Haskell (GHC 7.10.3)
Score 100
Code Size 110 Byte
Status AC
Exec Time 2 ms
Memory 380 KB

Judge Result

Set Name All
Score / Max Score 100 / 100
Status
AC × 10
Set Name Test Cases
All sample_01.txt, sample_02.txt, test_AzielehadfJD.txt, test_Oq.txt, test_P.txt, test_Wi.txt, test_ZNEFzealEAkD.txt, test_aAZaz.txt, test_z.txt, test_zDkElDjNVmAq.txt
Case Name Status Exec Time Memory
sample_01.txt AC 2 ms 380 KB
sample_02.txt AC 1 ms 380 KB
test_AzielehadfJD.txt AC 1 ms 380 KB
test_Oq.txt AC 1 ms 380 KB
test_P.txt AC 1 ms 380 KB
test_Wi.txt AC 2 ms 380 KB
test_ZNEFzealEAkD.txt AC 1 ms 380 KB
test_aAZaz.txt AC 1 ms 380 KB
test_z.txt AC 1 ms 380 KB
test_zDkElDjNVmAq.txt AC 1 ms 380 KB