Задача с матрицой Опции

[kostya]

Пожалуйста, помогите решить задачу.Дана целочисленная матрица, для каждой строки найти минимальный элемент и поставить его на главную диагональ. Заранее спасибо

[klem4]

В чем конкретно проблемма ?

for i := 1 to n do begin
   minN := 1;
   for j := 2 to m do // проходим по столбацам, ищем минимум в строке
    if x[i,j] < x[i,minN] then
      minN := j;
   x[i,i] := x[i, minN]; // присваиваем значение элементу диаганали
end;