Ciao mondo

di

…

putStrLn "Ciao mondo"

…

ciaoMondo = do
    putStr "Come ti chiami? "
    name <- getLine
    putStrLn ("Ciao " ++ name ++ "!")

…