CODE FESTIVAL 2016 qual A

Submission #1675436

Source codeソースコード

main = do
    s <- getLine
    let len_s = (length s) - 8
    let ans = (take len_s s) ++ " " ++ (drop len_s s)
    putStrLn ans

Submission

Task問題 A - CODEFESTIVAL 2016
User nameユーザ名 yk16
Created time投稿日時
Language言語 Haskell (GHC 7.10.3)
Status状態 AC
Score得点 100
Source lengthソースコード長 132 Byte
File nameファイル名
Exec time実行時間 2 ms
Memory usageメモリ使用量 380 KB

Test case

Set

Set name Score得点 / Max score Cases
Sample - 0_00.txt,0_01.txt,0_02.txt
All 100 / 100 0_00.txt,0_01.txt,0_02.txt,1_00.txt,1_01.txt,1_02.txt

Test case

Case name Status状態 Exec time実行時間 Memory usageメモリ使用量
0_00.txt AC 2 ms 380 KB
0_01.txt AC 1 ms 380 KB
0_02.txt AC 2 ms 380 KB
1_00.txt AC 1 ms 380 KB
1_01.txt AC 2 ms 380 KB
1_02.txt AC 2 ms 380 KB