Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Fibonacci series in Lisp
;Fibonacci series - 0 1 1 2 3 5 ... (setq first -1) (setq second 1) (defun fibo(n) ( loop for x from 1 to n do( setq third (+ first second))( print third) do( setq first second) do( setq second third) ) ) ( fibo 6 )
run
|
edit
|
history
|
help
0
#1MIN-2
5
Dumb sentence generator
#3ODD-GT-MILLION
Expansion - Common Lisp
quatroRainhas
Mo
hihi
Factorial in Lisp using loop for
Q5