We use cookies to ensure you have the best browsing experience on our website. Please read our cookie policy for more information about how we use cookies.
  1. Prepare
  2. Functional Programming
  3. Recursion
  4. Pascal's Triangle
  5. Discussions

Pascal's Triangle

  • strawstack
     + 2 comments

    UPDATE: Finally, figured out how to print a [[Char]] in the correct format with Haskell...

    -- PRINT with FORMAT    
two :: [Int] -> [String]
two m = map (show) m

three :: [[Int]] -> [[String]]
three m = map (two) m

main = do   
   m <- readLn :: IO Int
   --send (tri m) -- print tri to row m
   mapM_ (putStrLn . intercalate " " $) (three (tri m))

    Where (tri m) produces [["1"], ["1", "1"], ["1", "2", "1"], ["1", "3", "3", "1"]]