Submission #132036
Source Code Expand
import Control.Applicative main = do a <- read <$> getLine putStrLn $ (a*2 :: Int)
Submission Info
Submission Time | |
---|---|
Task | A - 流行 |
User | phi16 |
Language | Haskell (GHC 7.4.1) |
Score | 0 |
Code Size | 89 Byte |
Status | CE |
Compile Error
Main.hs:4:15: Couldn't match expected type `String' with actual type `Int' In the second argument of `($)', namely `(a * 2 :: Int)' In a stmt of a 'do' block: putStrLn $ (a * 2 :: Int) In the expression: do { a <- read <$> getLine; putStrLn $ (a * 2 :: Int) }