Question

Задание 2 Дана квадратная матрица А(N×N). Сформировать массив
В(N), каждый элемент которого определяется как:
Среднее арифметическое значение соответствующего столбца
матрицы.

Answer 1

// PascalABC.NET

begin

 var N := ReadInteger('n =');

 var A := MatrRandom(N, N, -99, 99);

 A.Println;

 var B := A.Cols.Select(Колонка -> Колонка.Average).Print

end.