遞迴

看到遞迴

函式可以呼叫自身,從而遞迴。

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) 將填充堆疊並引發錯誤。