Cоставьте программу, которая формирует массив из 7 случайных целых чисел от -10 до 10 и увеличивает в 4 раза числа кратные 4, а остальные уменьшает на 1

// PascalABC.NET 3.3, сборка 1576 от 16.11.2017// Внимание! Если программа не работает, обновите версию!beginvar a:=ArrRandom(7,-10,10);Writeln(a);a:= a.Select(t -> t mod 4 = 0? 4*t: t-1).ToArray;Writeln(a);end.