Solution for the problems in today's meetup

code.clj

; https://www.hackerrank.com/challenges/functional-programming-warmups-in-recursion---fibonacci-numbers
(let [fibos (iterate (fn [[a0 a1]] [a1 (+ a0 a1)]) [0 1])
      fibo (fn [n] (->> n dec (nth fibos) first))]
  (-> 
    (read)
    fibo
    println))

;https://www.hackerrank.com/challenges/pascals-triangle
(let [k (read)
      funny (fn [v]
              (apply println v)
              (map + (concat [0] v) (concat v [0])))
      _ (nth (iterate funny [1]) k)])