` 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