-- From http://learnyouahaskell.com/input-and-output

main = do
    rs <- sequence [getLine, getLine, getLine]
    print rs