Question

Записать программу формирования и выведения масива А розмером N, который
содержит N первых элементов последовательности чисел Фибоначчи

Answer 1

const
  n = 10;

var
  a: array [1..n] of integer;

begin
  a[1] := 1;
  a[2] := 2;
  write('1 2 ');
  for i: integer := 3 to n do
  begin
    a[i] := a[i - 2] + a[i - 1];
    write(a[i], ' ');
  end;
end.