programma sulla successione di fibonacci

[vegetto]

Il mio prof mi ha chiesto se gli faccio un programma con visual basic sulla successione di fibonacci,non riesco a capire in che modo devo dimostrargli questa successione, , ecco un link che parla di questa successione:http://www.provincia.parma.it/scuole...urea/mate3.htm

[Mius]

sinceramente non ho capito cosa vuoi chiederci! ci vuoi chiedere come fare un prog in vb perchè visualizzi la serie di fibonacci??

[vegetto]

si quello che dici tu, il mio problema e che non so cosa mettere nel form

[Mius]

beh mettici una listbox e scrivi in un command_click:
Dim a as integer
Dim b as integer
Dim c as integer
a = 0
b = 1
For i = 1 To 100
c = a + b
b = a
a = c
List1.AddItem c
Next
ti stampa i primi 100 numeri di fibonacci

PS: il codice l'ho scritto in 10 secondi quindi non è ottimizzato

[vegetto]

Grazie mius, ora lo provo

[ABCcletta]

Non ho letto il tuo link e non sono avvezzo di VB ma forse il tuo prof voleva una implementazione ricorsiva della progressione di Fibonacci...

[Fcx]

Forse questo i può aiutare è il programma per la serie di fibonacci, ma in turbo pascal: basta cambiare qualche istruzione:

Program fibonacci;
uses crt;
var n:integer;
Procedure fb (n:integer);
var i,n1,n2,temp:integer;
begin
n1:=0;
n2:=1;
i:=1;
writeln (n1);
while i<n do
begin
writeln (n2);
temp:=n2;
n2:=n2+n1;
n1:=temp;
i:=i+1;
end;
end;
begin
clrscr;
writeln ('Quanti numeri?');
readln (n);
fb (n);
readln;
end.