tite fractale

reverse_bind_parens.hs

télécharger

main :: IO ()
main = demander >>= (\input -> affiche (a_lenvers input))

affiche :: String -> IO ()
affiche = putStrLn

demander :: IO String
demander = getLine

a_lenvers :: String -> String
a_lenvers = reverse









Page générée le 27/05/2021, 09h53'27" (page virtuelle).
historique global