Relações de recorrência
12/10/2007
Relação de recorrência f(n)=f(n-1)+f(n-2)
> | Recor2 := proc(a1,a2,n::integer) |
> | local i,f1,f2,f; |
> | f1 := a1; |
> | f2 := a2; |
> | for i from 2 to n do |
> | f := f1 + f2; |
> | f1 := f2; |
> | f2 := f; |
> | od; |
> | RETURN(f1); |
> | end; |
> |
Sucessão de Fibonacci
> | seq(Recor2(1,1,i),i=1..20); |
Coberturas perfeitas
> | seq(Recor2(1,2,i),i=1..20); |
> | seq(Recor2(2,4,i),i=1..100); |
> |