дано масив А[n..1] скласти програму яка в масиві всі додатні числа збільшує на 2 а всі від'ємні числа зменшує на 2 паскаль

const    n = 10;begin    ArrRandom(n, -50, 50).Select((x, i) -> x + Sign(x) * 2).Print(', ');end.если нужна наглядность, то такconst    n = 10;begin    var a := ArrRandom(n, -50, 50).Print(', ');    writeln;    a.Select((x, i) -> x + Sign(x) * 2).Print(', ');end.