Clojure語言(2007年)
類型：dotimes(指定次數(shù))
(dotimes [i 5]
(println i))
注：以0開頭的，含頭不含尾。
類型：doseq(遍歷循環(huán))
(doseq [e [10 20 30]]
? (prn e))
類型：loop
(loop [i 1]
(when (< i 5)
(println i)
(recur (+ i 1))))
類型：當循環(huán)
(def i (atom 1))
(while (<= @i 5)
(println @i)
? (swap! i inc))
倒置：
(def i(atom 5))
(while (pos? @i)
(println @i)
(swap! i dec))
Hy語言(2013年)
(for [e [10 20 30]])
(print e))
(print (lfor e[10 20 30]))
newLISP語言(1991年)
dolist循環(huán)
(dolist (i (sequence 1 5))
(println i)
for循環(huán)
(for (i 1 (- n 1)))
ISLISP語言
(for ((e ’(10 20 30) (cdr e))
L++語言
(for (def i 1) (< i 5) (++ i)
(std::printf "Index=%d\n" i))
Janet語言(1984年)
(each? e v)
(print "Value=" e))
Jess語言
(while (< ?i 5) do
(bind ?i (?i 1))
OpenLISP語言(1988年)
(while (< i 5)
(format t "Index=~a~%" i))
TXR語言(2009年)
@(do (for(i 1))
(< i 5)
(inc i)
@(end)
Nu語言(2007年)
(set i 1)
while (< i 5)
(print "Index=#i\n")
(set i (+ i 1)))
