Заполнить массив из n частей следующим образом: 1-ый элемент равен 2,

PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 var n:=ReadInteger('n=');

 var a:=new integer[n];

 a[0]:=2;

 for var i:=1 to a.High do

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

 a.Println;

end.

Пример

n= 10

2 4 7 11 16 22 29 37 46 56