AtCoder Beginner Contest 019

Submission #345468

Source codeソースコード

{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE BangPatterns #-}

import Control.Applicative
import Control.Monad
import Control.Arrow
import Data.List
import Data.Maybe
import Data.Char
import Text.Printf

readInt = ( readLn :: IO Int )
getInts = map ( read :: String -> Int ) . words <$> getLine

which a b f = if f then a else b
mp [ a, b ] = ( a, b )

main = getLine >> getLine >>= print . length . group . sort . map ( f . ( read :: String -> Int ) ) . words

f x
	| odd x = x
	| otherwise = f ( x `div` 2 )

Submission

Task問題 C - 高橋くんと魔法の箱
User nameユーザ名 torus711
Created time投稿日時
Language言語 Haskell (GHC 7.4.1)
Status状態 AC
Score得点 100
Source lengthソースコード長 535 Byte
File nameファイル名
Exec time実行時間 1711 ms
Memory usageメモリ使用量 60512 KB

Test case

Set

Set name Score得点 / Max score Cases
Sample - subtask0_0.txt,subtask0_1.txt,subtask0_2.txt
Subtask1 20 / 20 subtask1_0.txt,subtask1_1.txt,subtask1_10.txt,subtask1_11.txt,subtask1_12.txt,subtask1_13.txt,subtask1_14.txt,subtask1_15.txt,subtask1_16.txt,subtask1_17.txt,subtask1_18.txt,subtask1_19.txt,subtask1_2.txt,subtask1_3.txt,subtask1_4.txt,subtask1_5.txt,subtask1_6.txt,subtask1_7.txt,subtask1_8.txt,subtask1_9.txt,subtask0_0.txt,subtask0_1.txt,subtask0_2.txt
Subtask2 30 / 30 subtask2_0.txt,subtask2_1.txt,subtask2_2.txt,subtask2_3.txt,subtask2_4.txt,subtask2_5.txt,subtask2_6.txt,subtask2_7.txt,subtask2_8.txt,subtask2_9.txt,subtask0_0.txt,subtask0_1.txt,subtask0_2.txt
All 50 / 50 subtask0_0.txt,subtask0_1.txt,subtask0_2.txt,subtask1_0.txt,subtask1_1.txt,subtask1_10.txt,subtask1_11.txt,subtask1_12.txt,subtask1_13.txt,subtask1_14.txt,subtask1_15.txt,subtask1_16.txt,subtask1_17.txt,subtask1_18.txt,subtask1_19.txt,subtask1_2.txt,subtask1_3.txt,subtask1_4.txt,subtask1_5.txt,subtask1_6.txt,subtask1_7.txt,subtask1_8.txt,subtask1_9.txt,subtask2_0.txt,subtask2_1.txt,subtask2_2.txt,subtask2_3.txt,subtask2_4.txt,subtask2_5.txt,subtask2_6.txt,subtask2_7.txt,subtask2_8.txt,subtask2_9.txt,subtask3_0.txt,subtask3_1.txt,subtask3_2.txt,subtask3_3.txt,subtask3_4.txt,subtask3_5.txt,subtask3_6.txt,subtask3_7.txt,subtask3_8.txt,subtask3_9.txt

Test case

Case name Status状態 Exec time実行時間 Memory usageメモリ使用量
subtask0_0.txt AC 341 ms 1320 KB
subtask0_1.txt AC 26 ms 1432 KB
subtask0_2.txt AC 28 ms 1260 KB
subtask1_0.txt AC 53 ms 2680 KB
subtask1_1.txt AC 61 ms 3224 KB
subtask1_10.txt AC 53 ms 2632 KB
subtask1_11.txt AC 66 ms 3356 KB
subtask1_12.txt AC 65 ms 3356 KB
subtask1_13.txt AC 66 ms 3356 KB
subtask1_14.txt AC 64 ms 3360 KB
subtask1_15.txt AC 68 ms 3356 KB
subtask1_16.txt AC 65 ms 3356 KB
subtask1_17.txt AC 67 ms 3292 KB
subtask1_18.txt AC 65 ms 3424 KB
subtask1_19.txt AC 68 ms 3356 KB
subtask1_2.txt AC 65 ms 3224 KB
subtask1_3.txt AC 62 ms 3292 KB
subtask1_4.txt AC 63 ms 3232 KB
subtask1_5.txt AC 64 ms 3224 KB
subtask1_6.txt AC 62 ms 3188 KB
subtask1_7.txt AC 61 ms 3228 KB
subtask1_8.txt AC 61 ms 3184 KB
subtask1_9.txt AC 65 ms 3216 KB
subtask2_0.txt AC 1051 ms 35996 KB
subtask2_1.txt AC 1452 ms 37532 KB
subtask2_2.txt AC 1469 ms 37528 KB
subtask2_3.txt AC 1480 ms 37528 KB
subtask2_4.txt AC 1456 ms 37536 KB
subtask2_5.txt AC 1442 ms 37532 KB
subtask2_6.txt AC 1437 ms 37532 KB
subtask2_7.txt AC 1449 ms 37532 KB
subtask2_8.txt AC 1456 ms 37532 KB
subtask2_9.txt AC 1473 ms 41124 KB
subtask3_0.txt AC 1032 ms 35992 KB
subtask3_1.txt AC 1624 ms 56092 KB
subtask3_2.txt AC 1683 ms 56088 KB
subtask3_3.txt AC 1711 ms 60512 KB
subtask3_4.txt AC 1691 ms 56092 KB
subtask3_5.txt AC 1620 ms 56092 KB
subtask3_6.txt AC 1676 ms 56092 KB
subtask3_7.txt AC 1674 ms 58524 KB
subtask3_8.txt AC 1642 ms 56092 KB
subtask3_9.txt AC 1652 ms 56096 KB