13 lines
187 B
Text
13 lines
187 B
Text
function var int: F(var int:n) =
|
|
if n == 0 then
|
|
1
|
|
else
|
|
n - M(F(n - 1))
|
|
endif;
|
|
|
|
function var int: M(var int:n) =
|
|
if (n == 0) then
|
|
0
|
|
else
|
|
n - F(M(n - 1))
|
|
endif;
|