Question

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

Answer 1

// PascalABC.NET 3.2, сборка 1341 от 20.11.2016
begin
  var a:=ArrRandom(7,-20,20); a.Println;
  a:=a.Select(x->abs(x)).ToArray; a.Println
end.

Пример
-9 17 6 1 20 9 -14
9 17 6 1 20 9 14