tac2.hs

main = do cs <- getContents
          putStr $ tac cs

tac :: String -> String
tac = unlines . reverse . lines

[Sample Code Index] [Support Site Top]