Submission #43298808

Source Code Expand

main :: IO ()
main = do
  a <- readLn
  [b, c] <- map read . words <$> getLine
  s <- getLine
  putStrLn $ show (a + b + c :: Int) ++ ' ' : s

Submission Info

Submission Time
Task PracticeA - Welcome to AtCoder
User gksato
Language Haskell (GHC 9.4.5)
Score 100
Code Size 146 Byte
Status AC
Exec Time 1 ms
Memory 6540 KiB

Judge Result

Set Name All
Score / Max Score 100 / 100
Status
AC × 7
Set Name Test Cases
All 00_rnd_01.txt, 00_rnd_02.txt, 00_rnd_03.txt, 00_rnd_04.txt, 00_rnd_05.txt, 00_sample_1.txt, 00_sample_2.txt
Case Name Status Exec Time Memory
00_rnd_01.txt AC 1 ms 6508 KiB
00_rnd_02.txt AC 1 ms 6440 KiB
00_rnd_03.txt AC 1 ms 6540 KiB
00_rnd_04.txt AC 1 ms 6448 KiB
00_rnd_05.txt AC 1 ms 6484 KiB
00_sample_1.txt AC 1 ms 6416 KiB
00_sample_2.txt AC 1 ms 6436 KiB