Дано целое число N. Последовательность чисел Фибоначчи FK определяется следующим образом: F1 = 1; F2 = 1; FK = FK-2 + FK-1; K = 3; 4; … Вывести элементы от F1 до FN . через цикл ip паскале

Pascal

var

 i, n: Integer;

 a:array of BigInteger;

begin

 write('Введите n:');

 readln(n);

 setlength(a,n);

 a[0]:=1;

 a[1]:=1;

 for i:=2 to n-1 do

   a[i]:=a[i-1]+a[i-2];

 for i:=0 to n-1 do

   write(a[i], ' ');

end.