Составьте программу заполнения массива a[1..10] следующими числами:
Индекс Элемента: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10.
Значения Элемента: 3, 5, 7, 9, 11, 13, 15, 17, 19, 21.

Закономерность: для каждого элемента массива его значение равно удвоенному индексу, увеличенному на 1.

// PascalABC.NET 3.3, сборка 1547 от 07.10.2017

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

begin

var a:=ArrGen(10,i->2*(i+1)+1); a.Println

end.