Factorial: Difference between revisions

Content added Content deleted
Line 6,175: Line 6,175:
end;</lang>
end;</lang>
=== Iterative FreePascal ===
=== Iterative FreePascal ===
⚫
{$mode objFPC}{R+}
⚫
<lang pascal>


⚫
<lang pascal>
⚫
{$mode objFPC}{R+}
FUNCTION Factorial ( n : qword ) : qword;
FUNCTION Factorial ( n : qword ) : qword;


Line 6,207: Line 6,207:
END;</lang>
END;</lang>
J.P.D. 2021/03/24


=== Recursive ===
=== Recursive ===
Retrieved from "https://rosettacode.org/wiki/Factorial"