Revision as of 10:01, 15 November 2019 (view source) rosettacode>Stevetf (→‎Nyquist) ← Older edit		Revision as of 10:02, 15 November 2019 (view source) rosettacode>Stevetf (→‎{{header\|Nyquist}}) Newer edit →
Line 5,159: =={{header\|Nyquist}}== Iterative:▼ Recursive:▼ <lang Nyquist>(defun factorial (n) (do ((x n (* x n))) Line 5,165: (setq n (1- n))))</lang> ▲Recursive: ▲Iterative: <lang Nyquist>(defun factorial (n) (if (= n 1)

Factorial: Difference between revisions

Factorial (view source)