在Delphi中,递归函数是指在函数内部调用自身的函数。递归是一种编程技巧,可以在解决问题时使用相似的子问题结构。下面是一个简单的例子,展示了如何在Delphi中创建递归函数:
program RecursiveExample;
{
$APPTYPE CONSOLE}
uses
System.SysUtils;
// 递归函数,计算阶乘
function Factorial(n: Integer): Integer;
begin
// 基本情况:当 n 为 0 或 1 时,阶乘为 1