Необходимо написать программу инициализации элементов одномерного массива, таким образом что бы значение элемента было равно сумме двух предыдущих значения первых двух вводятся с клавиатуры.
Числа Фибоначчи?
const
n = 20;
var
arr: array[1 .. n] of longint;
i: integer;
begin
write('arr[1] = '); readln(arr[1]);
write('arr[2] = '); readln(arr[2]);
for i := 3 to n do arr[i] := arr[i - 2] + arr[i - 1];
for i := 1 to n do write(arr[i]:6);
writeln;
end.