Deret Fibonacci dengan Pascal

Apa sih deret Fibonacci itu?
dan untuk  apa sih  fungsinys?
Deret Fibonacci adalah suatu deret matematika yang berasal dari penjumlahan dua bilangan sebelumnya,
    Kalau sudah mengerti apa itu deret Fibonacci dan Fungsinya, sekarang kita lanjutkan ke program yang akan kita buat untuk membuat deret tersebut....

Berikut ini source program untuk membuat deret Fibonacci dengan Pascal :

program fibonacci;
 uses crt;
 var
    n:integer;
    i:integer;
    deret:array[1..100] of longint;

 begin
  {deret fibonacci adalah deret yang merupakan hasil penjumlahan 2 bilangan sebelumnya}
  {7 awal deret fibonacci = 1,1,2,3,5,8,13,...}
   clrscr;
   write('Masukan jumlah deret :');
   readln(n);
   writeln;
   for i := 0 to n-1 do
   begin
     if (i = 0) or (i = 1) then
     begin
       deret[i]:=1;
       write(deret[i],' ');
     end
     else
      begin
        deret[i]:=deret[i-1]+deret[i-2];
        write(deret[i], ' ');
      end;
   end;
   readln;
 end.