` Classical fibonaci algorithm

/*
Mathematician  Leonardo Fibonacci posed the following problem in his treatise Liber Abaci (pub. 1202)
How many pairs of rabbits will be produced in a year, beginning with a single pair,
if in every month each pair bears a new pair which becomes productive from the second month on?
*/


constant int fibmax = 16
int z = 0

` recursive Fibonacci function

int fib(int n)
    if n < 2
        z = n
    else
        z =  fib(n - 1) + fib(n - 2)
    /if
return z

int i
for i in 0..fibmax
    echo "fib(", i, ")=" , fib(i)
    print
/for