Factorial: Difference between revisions
Content added Content deleted
m (→FORTRAN 77) |
|||
Line 3,612: | Line 3,612: | ||
RETURN |
RETURN |
||
END |
END |
||
=={{header|FPr}}== |
|||
FP-Way |
|||
<lang fpr>fact==((1&),iota)\(1*2)& </lang> |
|||
Recursive |
|||
<lang fpr>fact==(id<=1&)->(1&);id*fact°id-1& </lang> |
|||
=={{header|FreeBASIC}}== |
=={{header|FreeBASIC}}== |