RosettaCodeData/Task/Fibonacci-sequence/Octave/fibonacci-sequence-1.octave

9 lines
135 B
Plaintext

% recursive
function fibo = recfibo(n)
if ( n < 2 )
fibo = n;
else
fibo = recfibo(n-1) + recfibo(n-2);
endif
endfunction