FIBONACCI // Algoritmo e programação

algoritmo "sucessão de Fibonacci"
//Um matemático italiano conseguiu modelar o ritmo de crescimento da população
 //de coelhos através de uma sequência de números naturais que passou a ser
 //conhecida como sequência de Fibonacci. O n-ésimo número da sequência de
 //Fibonacci é dado por:
 //F1 = 1
 //F2 = 1
 //Fi = Fi - 1 + Fi - 2, para i > 2.
 //Por exemplo, os sete primeiros elementos são: 1, 1, 2, 3, 5, 8, 13.
 //Desenvolva um algoritmo que lê N e mostra o N-ésimo elemento da série.

var f1,f2,f3,f5,f8,f13,f21,f34,f89: inteiro

inicio
f1<-1+0
f2<-1+0
f3<-f1+f2
f5<- f2+f3
f8<- f3+f5
f13<-f5+f8
f21<-f8+f13
f34<-f13+f21
f89<-f21+f34
escreval (f1,f2,f3,f5,f8,f13,f21,f34,f89)
escreval ("O último termo é ",f89)


fimalgoritmo