langs a-z
This commit is contained in:
parent
db842d013d
commit
d066446780
11389 changed files with 98361 additions and 1020 deletions
7
Task/Fibonacci-sequence/BASIC/fibonacci-sequence-3.basic
Normal file
7
Task/Fibonacci-sequence/BASIC/fibonacci-sequence-3.basic
Normal file
|
|
@ -0,0 +1,7 @@
|
|||
FUNCTION recFib (n)
|
||||
IF (n < 2) THEN
|
||||
recFib = n
|
||||
ELSE
|
||||
recFib = recFib(n - 1) + recFib(n - 2)
|
||||
END IF
|
||||
END FUNCTION
|
||||
Loading…
Add table
Add a link
Reference in a new issue