Submission #161709
Source Code Expand
{-# LANGUAGE BangPatterns #-} import Control.Applicative import Control.Monad import qualified Data.ByteString.Char8 as S import Data.List import Data.Maybe -- main main :: IO () main = do n <- readLn print (n-1) -- util getInts :: IO [Int] getInts = catMaybes . map (fmap fst . S.readInt) . S.words <$> S.getLine getInt :: IO Int getInt = fst . fromJust . S.readInt <$> S.getLine
Submission Info
Submission Time | |
---|---|
Task | A - 植木算 |
User | tanakh |
Language | Haskell (GHC 7.4.1) |
Score | 100 |
Code Size | 453 Byte |
Status | AC |
Exec Time | 432 ms |
Memory | 1436 KB |
Judge Result
Set Name | Sample | All | ||||
---|---|---|---|---|---|---|
Score / Max Score | 0 / 0 | 100 / 100 | ||||
Status |
|
|
Set Name | Test Cases |
---|---|
Sample | subtask0_sample01.txt, subtask0_sample02.txt, subtask0_sample03.txt |
All | subtask0_sample01.txt, subtask0_sample02.txt, subtask0_sample03.txt, subtask1_01.txt, subtask1_02.txt, subtask1_03.txt, subtask1_04.txt, subtask1_05.txt, subtask1_06.txt, subtask1_07.txt, subtask1_08.txt, subtask1_09.txt, subtask1_10.txt, subtask1_11.txt, subtask1_12.txt, subtask1_13.txt, subtask1_14.txt |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
subtask0_sample01.txt | AC | 432 ms | 1316 KB |
subtask0_sample02.txt | AC | 31 ms | 1308 KB |
subtask0_sample03.txt | AC | 25 ms | 1308 KB |
subtask1_01.txt | AC | 25 ms | 1304 KB |
subtask1_02.txt | AC | 25 ms | 1260 KB |
subtask1_03.txt | AC | 25 ms | 1308 KB |
subtask1_04.txt | AC | 24 ms | 1312 KB |
subtask1_05.txt | AC | 25 ms | 1436 KB |
subtask1_06.txt | AC | 25 ms | 1308 KB |
subtask1_07.txt | AC | 25 ms | 1304 KB |
subtask1_08.txt | AC | 23 ms | 1260 KB |
subtask1_09.txt | AC | 24 ms | 1304 KB |
subtask1_10.txt | AC | 25 ms | 1312 KB |
subtask1_11.txt | AC | 23 ms | 1256 KB |
subtask1_12.txt | AC | 25 ms | 1264 KB |
subtask1_13.txt | AC | 25 ms | 1312 KB |
subtask1_14.txt | AC | 24 ms | 1308 KB |