Quote:
Originariamente inviato da xxx Alcatraz xxx
ingpeo, grazie mille!
Purtroppo non è che ci ho capito moltissimo 
Io ho fatto così:
program fibonacci;
var i,a,n:integer;
begin
writeln('Inserisci un numero');
readln(n);
for i:=0 to n do
a:=a*(i-1)+a*(i-2);
writeln(a);
readln
end.
Ma mi da come risultato zero.
|
Ma avete fatto le array?
Se no ti servono delle variabili di appoggio.
Dimmi che te lo passo.