il 1° mese è presente una coppia di conigli
	una coppia di conigli diventa "matura" all'inizio del 2° mese di vita
	la gestazione dura un mese
	ogni parto produce una coppia di conigli

Fib(n)=1                 n=1
Fib(n)=1                 n=2
Fib(n)=Fib(n-1)+Fib(n-2) altrimenti

Fib(5) = Fib(4)+Fib(3)
       = [Fib(3)+Fib(2)]+[Fib(2)+Fib(1)]
       = [Fib(2)+Fib(1)]+1+1+1
       = 1+1+1+1+1
       = 5 coppie

function FiboRic(N: LongInt): LongInt;
begin
  if(N <= 2) then
    FiboRic:=1
  else
    FiboRic:=FiboRic(N-1)+FiboRic(N-2);
end;

Fib(1) = 1
Fib(2) = 1
Fib(3) = Fib(2)+Fib(1) = 1+1 = 2
Fib(4) = Fib(3)+Fib(2) = 2+1 = 3
Fib(5) = Fib(4)+Fib(3) = 3+2 = 5 coppie

function FiboIter(N: Integer): LongInt;
Var
  I, A, B, C: LongInt;
begin
  if(N <= 2) then
    FiboIter:=1
  else
    begin
      A:=1;
      B:=1;
      for I:=3 to N do
        begin
          C:=A+B;
          A:=B;
          B:=C;
        end;
      FiboIter:=C;
    end;
end;