Submission #35092811

Source Code Expand

import Control.Monad
import Data.Maybe
import qualified Data.ByteString.Char8 as BS
import Data.List
import Data.Bits

readInt = fst . fromJust . BS.readInt
readIntList = map readInt . BS.words
getInt = readInt <$> BS.getLine
getIntList = readIntList <$> BS.getLine

main = do
        [a, b] <- getIntList
        print $ a .|. b

Submission Info

Submission Time
Task A - 1-2-4 Test
User pel
Language Haskell (GHC 8.8.3)
Score 100
Code Size 342 Byte
Status AC
Exec Time 6 ms
Memory 3780 KiB

Compile Error

Loaded package environment from /home/contestant/.ghc/x86_64-linux-8.8.3/environments/default

Judge Result

Set Name Sample All
Score / Max Score 0 / 0 100 / 100
Status
AC × 3
AC × 10
Set Name Test Cases
Sample example_00.txt, example_01.txt, example_02.txt
All example_00.txt, example_01.txt, example_02.txt, hand_00.txt, hand_01.txt, hand_02.txt, hand_03.txt, hand_04.txt, hand_05.txt, hand_06.txt
Case Name Status Exec Time Memory
example_00.txt AC 6 ms 3668 KiB
example_01.txt AC 2 ms 3732 KiB
example_02.txt AC 2 ms 3624 KiB
hand_00.txt AC 2 ms 3540 KiB
hand_01.txt AC 3 ms 3548 KiB
hand_02.txt AC 2 ms 3552 KiB
hand_03.txt AC 2 ms 3552 KiB
hand_04.txt AC 3 ms 3736 KiB
hand_05.txt AC 2 ms 3692 KiB
hand_06.txt AC 2 ms 3780 KiB