t1=0
 t2=1
 n=5
 I<-for(i in 1:n)
 {
 print(t1)
 nextTerm= t1+t2
 t1=t2
 t2=nextTerm
 }