Question

Сформировать массив элемента которого равен квадрата своих индексов

Answer 1

===== PascalABC.NET =====

begin

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

 var a := ArrGen(n, i -> Sqr(i + 1));

 a.Println

end.