Составьте программу для решения следующей : задан массив в, состоящий из х чисел.выведете на экран элементы противоположные элементам данного массива. первоначально элементы вводятся случайно из промежутка [-17; 17]

//PascalABC.NET 3.1 сборка 1219
begin
    var a := ArrRandomInteger(ReadInteger('x ='), -17, 17);
    a.Println;
    a.Transform(x -> -x);
    a.Println;
end.