Question

ПАСКАЛЬ ABC.NET


Дан массив А. Сформировать массив В, элементы которого вычисляются по формуле $B_{i}$= (i+1)*$A_{i}$

Answer 1

begin

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

 var a := ArrRandom(n, -10, 99);

 a.Println;

 var b := a.Select((v,i) -> (i + 1) * v).ToArray;

 b.Println;

end.