import Control.Monad import Data.Char main = forever $ do putStr "Give me some input: " l <- getLine putStrLn $ map toUpper l
在国外读书?求作业解答什么的么....你好歹问题问好点啊...只给个invert怎么知道你要做什么....
