5 lines
100 B
Common Lisp
5 lines
100 B
Common Lisp
(let ((val 0))
|
|
(loop do
|
|
(incf val)
|
|
(print val)
|
|
while (/= 0 (mod val 6))))
|