Submission #426219
Source Code Expand
{-# OPTIONS_GHC -O2 #-} {-# LANGUAGE BangPatterns #-} import Data.Maybe import Data.Char import Data.List import Data.Int import Data.Bits import Data.IORef import Data.Array.IO import Control.Monad import Control.Applicative import qualified Data.ByteString.Char8 as BS import qualified Data.Map as Map import qualified Data.Set as Set import Text.Printf import Debug.Trace import System.Exit getint :: IO Int getint = head <$> getints getints :: IO [Int] getints = map fst . mapMaybe BS.readInt . BS.words <$> BS.getLine getnums :: Num a => IO [a] getnums = map (fromIntegral . fst) . mapMaybe BS.readInteger . BS.words <$> BS.getLine getstr = getLine main = getints >>= \[a, b] -> print $ max a b
Submission Info
Submission Time | |
---|---|
Task | A - 正直者 |
User | Hagentern |
Language | Haskell (GHC 7.4.1) |
Score | 100 |
Code Size | 764 Byte |
Status | AC |
Exec Time | 33 ms |
Memory | 1248 KB |
Judge Result
Set Name | all | ||
---|---|---|---|
Score / Max Score | 100 / 100 | ||
Status |
|
Set Name | Test Cases |
---|---|
all | 00_sample_01.txt, 00_sample_02.txt, kensho_diff01, kensho_diff02, kensho_diff03, kensho_diff04, kensho_diff05, kensho_min-max01, kensho_min-max02, kensho_min-max03, kensho_min-max04, kensho_min-max05, kensho_min-max06, kensho_min-max07, kensho_min-max08, kensho_min-max09, kensho_min-max10, kensho_rand01, kensho_rand02, kensho_rand03, kensho_rand04, kensho_rand05, kensho_rand06, kensho_rand07, kensho_rand08, kensho_rand09, kensho_rand10 |
Case Name | Status | Exec Time | Memory |
---|---|---|---|
00_sample_01.txt | AC | 33 ms | 1124 KB |
00_sample_02.txt | AC | 31 ms | 1188 KB |
kensho_diff01 | AC | 33 ms | 1116 KB |
kensho_diff02 | AC | 30 ms | 1128 KB |
kensho_diff03 | AC | 31 ms | 1248 KB |
kensho_diff04 | AC | 30 ms | 1136 KB |
kensho_diff05 | AC | 31 ms | 1156 KB |
kensho_min-max01 | AC | 30 ms | 1168 KB |
kensho_min-max02 | AC | 30 ms | 1196 KB |
kensho_min-max03 | AC | 31 ms | 1156 KB |
kensho_min-max04 | AC | 30 ms | 1104 KB |
kensho_min-max05 | AC | 29 ms | 1164 KB |
kensho_min-max06 | AC | 30 ms | 1172 KB |
kensho_min-max07 | AC | 30 ms | 1156 KB |
kensho_min-max08 | AC | 29 ms | 1196 KB |
kensho_min-max09 | AC | 29 ms | 1164 KB |
kensho_min-max10 | AC | 27 ms | 1172 KB |
kensho_rand01 | AC | 29 ms | 1196 KB |
kensho_rand02 | AC | 30 ms | 1172 KB |
kensho_rand03 | AC | 30 ms | 1156 KB |
kensho_rand04 | AC | 29 ms | 1164 KB |
kensho_rand05 | AC | 29 ms | 1164 KB |
kensho_rand06 | AC | 32 ms | 1176 KB |
kensho_rand07 | AC | 29 ms | 1200 KB |
kensho_rand08 | AC | 29 ms | 1196 KB |
kensho_rand09 | AC | 28 ms | 1196 KB |
kensho_rand10 | AC | 29 ms | 1160 KB |