Los números en el borde del triángulo son todos 1, y cada número dentro del triángulo es la suma de los dos números que están arriba. Escriba un procedimiento que una fila del triángulo de Pascal ( Parámetros : fila) rowPas :: Int -> [Int] 1 1 1 1 1 1 1 2 1 1 2 1 1 3 3 1 1 3 3 1 1 4 6 4 1 1 4 6 4 1

rowPas n = iterate f [1] !! (n-1)
  where
    f xs = zipWith (+) ([0] ++ xs) (xs ++ [0])