Паскаль.известно, что первые два элемента массива равны a и b. а каждый следующий элемент равен сумме значений всех предыдущих

Question

Информатика: Паскаль.известно, что первые два элемента массива равны a и b. а каждый следующий элемент равен сумме значений всех предыдущих элементов и собственного номера (нумерация элементов массива начинается с единицы). заполните массив из n элементов, используя этот принцип и выведите значения элементов массива в обратном порядке. формат входных данных целые положительное число n (2 целые числа a,b (-50 a,b 50) формат выходных данных строка, содержащая элементы искомого массива в обратном порядке, записанные

dawesmm · Answer

Var n, a, b, i, j: integer;
ar: array[1..10000]of integer;
begin
read(n, a, b);
ar[1] := a;
ar[2] := b;
for i := 3 to n do
begin
for j := 1 to i - 1 do
begin
ar[i] := ar[i] + ar[j];
end;
ar[i] := ar[i] + i;
end;
for i := n downto 1 do write(ar[i],' ');
end.

Популярные вопросы