Нахождения максимального и минимального столбца, в матрице Опции

[noki]

у меня есть матрица из 3 строк и 4 столбцов, как мне найти минимальный и максимальный столбец и вывести их???

[noki]

Тут вот понаписали, а вообще на сколько я знаю тут он найдет минимальный элемент в матрице, И КОИМ ОБРЗОМ это относится к моему заданию???


min:=a[1,1];
for i:=1 to n do
for j:=1 to m do
begin
if a[i,j] < min then min:=a[i,j]; нашли минимум и присвоили
minNomerStroki:=i;
minNomerStolbtsa:=j;
запомнили номера строки и столбца с мин. элементом
end;