Submission #227198

Source Code Expand

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

main :: IO ()
main = do
  n <- read <$> getLine
  x <- map read <$> replicateM n getLine
  putStrLn $ show $ solve x

solve :: [Int] -> Int
solve = head . sort

Submission Info

Submission Time
Task B - おいしいたこ焼きの食べ方
User hamadu
Language Haskell (GHC 7.4.1)
Score 100
Code Size 238 Byte
Status AC
Exec Time 33 ms
Memory 1816 KB

Judge Result

Set Name All
Score / Max Score 100 / 100
Status
AC × 33
Set Name Test Cases
All rand0.txt, rand1.txt, rand10.txt, rand11.txt, rand12.txt, rand13.txt, rand14.txt, rand15.txt, rand16.txt, rand17.txt, rand18.txt, rand19.txt, rand2.txt, rand20.txt, rand21.txt, rand22.txt, rand23.txt, rand24.txt, rand25.txt, rand26.txt, rand27.txt, rand28.txt, rand29.txt, rand3.txt, rand4.txt, rand5.txt, rand6.txt, rand7.txt, rand8.txt, rand9.txt, s1.txt, s2.txt, s3.txt
Case Name Status Exec Time Memory
rand0.txt AC 31 ms 1816 KB
rand1.txt AC 28 ms 1696 KB
rand10.txt AC 28 ms 1564 KB
rand11.txt AC 27 ms 1388 KB
rand12.txt AC 29 ms 1696 KB
rand13.txt AC 27 ms 1568 KB
rand14.txt AC 28 ms 1696 KB
rand15.txt AC 28 ms 1700 KB
rand16.txt AC 27 ms 1380 KB
rand17.txt AC 28 ms 1696 KB
rand18.txt AC 28 ms 1696 KB
rand19.txt AC 26 ms 1440 KB
rand2.txt AC 26 ms 1308 KB
rand20.txt AC 28 ms 1700 KB
rand21.txt AC 26 ms 1308 KB
rand22.txt AC 27 ms 1372 KB
rand23.txt AC 27 ms 1696 KB
rand24.txt AC 26 ms 1308 KB
rand25.txt AC 28 ms 1696 KB
rand26.txt AC 27 ms 1568 KB
rand27.txt AC 27 ms 1700 KB
rand28.txt AC 28 ms 1700 KB
rand29.txt AC 27 ms 1568 KB
rand3.txt AC 26 ms 1316 KB
rand4.txt AC 27 ms 1568 KB
rand5.txt AC 29 ms 1692 KB
rand6.txt AC 28 ms 1692 KB
rand7.txt AC 28 ms 1696 KB
rand8.txt AC 28 ms 1700 KB
rand9.txt AC 26 ms 1312 KB
s1.txt AC 26 ms 1316 KB
s2.txt AC 33 ms 1248 KB
s3.txt AC 26 ms 1308 KB