Delphi for循环的写法

var a,b,i: longint;begina:=0; b:=1; write(a, ', ',b);for i:=2 to 10 dobegin a:=a+b; b:=a+b; write( ', 'a, ', ',b); end;end. 黑色头发:http://heisetoufa.iteye.com/