Question

Данная матрица размера M × N. Найти минимальный среди максимальных элементов ее столбцов.(pascal)

Answer 1

begin

   var (m, n) := ReadInteger2('Введите m и n:');

   var a := MatrRandom(m, n, -99, 99);

   a.Println;

   a.Cols.Select(col -> col.Max).Min.Println

end.