Slt les amis , jai besoin de votre aide pour resoudre ce exercice . La traduction se fait en turbo pascal .
 
On considere la suite de Fibonacci define par  U0=U1 =1
                                                                     
                                                              Un=Un -1 +Un-2
                                                                         
 
Donner un algorithme qui donne la somme des Q premiers termes de cette suite .  
 
 
NB: U0,U1,Un-1,Un-2  (tout es en indice )
 
merci de votre aide !!!
                                                                     

C'est marrant ça sent l'exercice de TD

C'est marrant mais "les amis" sentent aussi cela ...

function FIBO (n:integer):integer;
var i :integer;
begin
U0:=1;
U1:=1;
if n<=2 then f:=1
else  
for i:= 3 to n do
begin
f:=U0+U1
U1:=u2;
U2:=f;
end;
FIBO:=f;
end;