RosettaCodeData/Task/Fibonacci-sequence/Common-Lisp/fibonacci-sequence-3.lisp
2023-07-01 13:44:08 -04:00

1 line
60 B
Common Lisp

(loop for x = 0 then y and y = 1 then (+ x y) do (print x))