Задание 2 Дана квадратная матрица А(N×N). Сформировать массив В(N), каждый элемент которого определяется как: Среднее арифметическое значение соответствующего столбца матрицы.
// PascalABC.NET
begin
var N := ReadInteger('n =');
var A := MatrRandom(N, N, -99, 99);
A.Println;
var B := A.Cols.Select(Колонка -> Колонка.Average).Print
end.