Question

我不明白我是如何让它发挥作用的，我尝试了很多方法，但是这一切都是唯一一个只做一点工作的人！有人可以给我一个想法吗？

lcms :: (Integral a) => [a] -> a

parseIntList :: String -> [Int]
parseIntList s = [read x :: Int | x <- words s]

main = do
        a <- getLine --1,2,3
        let x = parseIntList a 
        print x -- [1,2,3]
        lcms  x --?

Answer 1

lcms x只是一个数值。将其直接绑定在do IO行为中的main块，就像要求某人“请取邮件，然后购买一些牛奶，然后发射导弹，然后再发射36”。好吧，那肯定会提示回复 36 - 什么？

如果您想打印 lcms x的结果，请说出来。

main :: IO ()
main = do
    a <- getLine
    let x = parseIntList a 
    print x
    print $ lcms x

如何使用haskell读取字符串

1 个答案: