8 lines
141 B
Text
8 lines
141 B
Text
|
Procedure FibonacciReq(n)
|
||
|
|
If n<2
|
||
|
|
ProcedureReturn n
|
||
|
|
Else
|
||
|
|
ProcedureReturn FibonacciReq(n-1)+FibonacciReq(n-2)
|
||
|
|
EndIf
|
||
|
|
EndProcedure
|