递归

看到递归

函数可以调用自身，从而递归。

FUNCTION factorial INTEGER (num AS INTEGER).

    IF num = 1 THEN 
        RETURN 1.
    ELSE 
        RETURN num * factorial(num - 1).

END FUNCTION.

DISPLAY factorial(5).

使用标准设置（启动参数），在此示例中，Progress 会话将无法处理非常大的数字。factorial(200) 将填充堆栈并引发错误。