Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Factorial in Lisp using loop for
(setf fact 1) (defun facto(n) ( loop for x from 2 to n do(setq fact (* x fact)) ) (print fact) ) ( FACTO 5)
run
|
edit
|
history
|
help
0
test***
L1.8a
busqueda.lsp
13
Sum_of_evens
5
Q1WorkInProgress
Sw
Pec2 Tests
lab12