ちょっとだけお勉強。覚えること多いし、それ以上に考え方変えてかなきゃいけないから大変だなぁ。
#!/usr/bin/env clj ; FizzBuzz (println (map (fn [x] (cond (= (rem x 15) 0) 'FizzBuzz (= (rem x 5) 0) 'Buzz (= (rem x 3) 0) 'Fizz :else x)) (range 1 101)))
Lisp のインデントわからない…フォーマッタあるよね多分。
完全に手続き脳だからいちいち (println x)
したくなるけど、そんなの後でやればいい、と。
0 コメント:
コメントを投稿