Мин элемент каждого столбца матрицы Опции

[DZZRtt]

Нужно найти минимальный элемент каждого столбца матрицы
Програмку я написал все работает.

for J:=1 to m do begin
min:=a[1,j]; minj:=1;
for i:=1 to n do begin
if a[i,j]<min then min:=A[i,j];
minj:=j;
end;
writeln ('Минимальный элемент столбца № ',minj,' =',min);

Остальное приводить не стал, там просто описание переменных и ввод/вывод матрицы.
Вот только вопрос почему при описании цикла первым указывается столбец

Код

for J:=1 to m do begin

, а затем уже строка

Код

for i:=1 to n do begin

,
просто перебрал кучу вариантов и только в этом работало как надо.

[volvo]

А зачем варианты-то перебирать? В задании же ясно сказано: минимум в столбце, значит первый индекс матрицы (номер строки) изменяется быстрее... Отсюда следует, что первый индекс должен меняться во внутреннем цикле.