Haskell从标准输入解析和构造对象

示例

readFloat :: IO Float
readFloat =
    fmap read getLine


main :: IO ()
main = do
    putStr "输入第一个数字: "
    first <- readFloat

    putStr "输入第二个数字: "
    second <- readFloat

    putStrLn $ show first ++ " + " ++ show second ++ " = " ++ show ( first + second )

输入:

输入第一个数字: 9.5
输入第二个数字: -2.02

输出:

9.5 + -2.02 = 7.48