Submission #173960

Source Code Expand

import Control.Applicative
import Control.Monad
import Data.List

main :: IO ()
main = do
  [a] <- map read . words <$> getLine
  print $ (a+1)`div`2

Submission Info

Submission Time
Task A - 引越し作業
User tanakh
Language Haskell (GHC 7.4.1)
Score 100
Code Size 158 Byte
Status AC
Exec Time 50 ms
Memory 1312 KB

Judge Result

Set Name All
Score / Max Score 100 / 100
Status
AC × 22
Set Name Test Cases
All large_1000.txt, large_997.txt, large_998.txt, large_999.txt, random_148.txt, random_155.txt, random_198.txt, random_362.txt, random_403.txt, random_667.txt, random_795.txt, random_811.txt, random_85.txt, random_959.txt, small_10.txt, small_11.txt, small_3.txt, small_4.txt, small_6.txt, small_7.txt, small_8.txt, small_9.txt
Case Name Status Exec Time Memory
large_1000.txt AC 26 ms 1304 KB
large_997.txt AC 50 ms 1308 KB
large_998.txt AC 26 ms 1308 KB
large_999.txt AC 24 ms 1312 KB
random_148.txt AC 23 ms 1304 KB
random_155.txt AC 24 ms 1308 KB
random_198.txt AC 24 ms 1312 KB
random_362.txt AC 24 ms 1312 KB
random_403.txt AC 24 ms 1308 KB
random_667.txt AC 24 ms 1308 KB
random_795.txt AC 24 ms 1264 KB
random_811.txt AC 25 ms 1312 KB
random_85.txt AC 24 ms 1308 KB
random_959.txt AC 42 ms 1308 KB
sample_1.txt AC 24 ms 1300 KB
sample_2.txt AC 24 ms 1308 KB
sample_3.txt AC 24 ms 1264 KB
small_10.txt AC 24 ms 1312 KB
small_11.txt AC 25 ms 1312 KB
small_3.txt AC 29 ms 1308 KB
small_4.txt AC 24 ms 1308 KB
small_6.txt AC 24 ms 1312 KB
small_7.txt AC 25 ms 1312 KB
small_8.txt AC 26 ms 1304 KB
small_9.txt AC 23 ms 1308 KB