В программе pascalABC.NET1)Дан массив из 10 элементов, заменить все элементы на противоположные по знаку.2)Дан одномерный массив. Прибавьте ко всем элемента по 1.3)Дан одномерный массив. Уменьшите значение элементов на 3.

begin
  var a:=ArrRandom(10,-50,50); a.Println;
  a.Transform(x->-x); a.Println;
  a.Transform(x->x+1); a.Println;
  a.Transform(x->x-3); a.Println
end.


-46 23 16 -36 -19 -37 -12 11 -30 44
46 -23 -16 36 19 37 12 -11 30 -44
47 -22 -15 37 20 38 13 -10 31 -43
44 -25 -18 34 17 35 10 -13 28 -46