решить задачу. Найти номер столбца массива размером MxN, в котором находится наибольшее количество отрицательных элементов. Элементы вводятся с клавиатуры.
Язык Pascal.

begin var (m,n) := ReadInteger2('Введите M и N:'); var mtr := MatrRandom(m,n,-99,99).Print; mtr.Cols.Numerate.MaxBy(c->c[1].Count(x->x<0))[0].Printend.

Пример работы: