Submission #186925


Source Code Expand

f :: Int -> Int
f x
  | x == 12 = 1
  | otherwise = x + 1

main :: IO ()
main = do
  n <- readLn
  print $ f n

Submission Info

Submission Time
Task A - 来月は何月?
User Doxes
Language Haskell (GHC 7.4.1)
Score 100
Code Size 118 Byte
Status AC
Exec Time 31 ms
Memory 1564 KB

Judge Result

Set Name All
Score / Max Score 100 / 100
Status
AC × 12
Set Name Test Cases
All test_1.txt, test_10.txt, test_11.txt, test_12.txt, test_2.txt, test_3.txt, test_4.txt, test_5.txt, test_6.txt, test_7.txt, test_8.txt, test_9.txt
Case Name Status Exec Time Memory
test_1.txt AC 29 ms 1440 KB
test_10.txt AC 29 ms 1444 KB
test_11.txt AC 30 ms 1444 KB
test_12.txt AC 31 ms 1504 KB
test_2.txt AC 29 ms 1508 KB
test_3.txt AC 29 ms 1504 KB
test_4.txt AC 29 ms 1504 KB
test_5.txt AC 29 ms 1504 KB
test_6.txt AC 29 ms 1564 KB
test_7.txt AC 28 ms 1432 KB
test_8.txt AC 29 ms 1544 KB
test_9.txt AC 29 ms 1444 KB