10 lines
167 B
Text
10 lines
167 B
Text
|
|
- fib(n : UINTEGER_32) : UINTEGER_64 <- (
|
||
|
|
+ result : UINTEGER_64;
|
||
|
|
(n < 2).if {
|
||
|
|
result := n;
|
||
|
|
} else {
|
||
|
|
result := fib(n - 1) + fib(n - 2);
|
||
|
|
};
|
||
|
|
result
|
||
|
|
);
|