FizzBuzzとの3か月(9)

お世話になっております。

今日は、lispで変数を使ってみました。
目立った効果は出せませんでした。lispの真の力はこんなものではないと思うのですが。

以下、コードです。

(dotimes (i 100)
  (print (let (param)
           (setq param (+ i 1))
           (cond ((and (= 0 (mod param 3))
                       (= 0 (mod param 5))) "FizzBuzz")
                 ((= 0 (mod param 3)) "Fizz")
                 ((= 0 (mod param 5)) "Buzz")
                 ((+ i 1))
                 ))))

以上