составьте программу которая формирует массив из 14 случайных чисел, принадлежащих промежутку [-20, 30], заменяет все чётные значения элементов массива квадратами их номеров

begin
var a:= ArrRandom(14,-20,30).Println.Select((v,i)->v.IsEven?(i+1)*(i+1):v).Println;
end.


28 -12 -8 21 -16 11 3 21 11 -13 26 4 -19 23
1 4 9 21 25 11 3 21 11 -13 121 144 -19 23