Question

Необходимо задать массив размерностью 5, заполнить массив случайными числами в интервале [-1,1] и вывести элементы на экран: определить три позиции для вывода каждого элемента.

Answer 1

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

begin

 var a := ArrRandom(5, -1, 1);

 foreach var x in a do

   Write(x:3)

end.