Factorial: Difference between revisions

(Added Oberon-07, use modula2 for syntax highlighting Oberon-2 and Oberon-07)
Line 6,045:
 
=== Recursive ===
<syntaxhighlight lang="langur">val .factorial = fn(.x) { if(.x < 2: 1; .x * self(.x - 1)) }
writeln .factorial(7)</syntaxhighlight>
 
Line 6,060:
 
=== Iterative Folding ===
<syntaxhighlight lang="langur">val .factorial = fn(.n) { for[=1] .x in .n { _for *= .x } }
writeln .factorial(7)</syntaxhighlight>
 
890

edits