Задача паскаль ABC, Помогите пожалуйста решить задачу.Не получается замена минимальных эле Опции

[Vasy 444]

Ввести матрицу A(N,M). Определить значение среднего арифметического Sa всей матрицы. Заменить в каждой строке матрицы минимальный элемент на значение Sa. Матрицу распечатать.

[@nto$ka]

for i:=1 to N do
begin
  min:=maxint;
  for j:=1 to M do 
    if m[i,j] < min then
    begin
        min:=a[i,j];
        index:=j; 
    end;
  m[i, index]:=Sa;
end;

На самом деле, это просто алгоритм поиска минимального числа. Можешь прогуглить. Просто поиск ведется Несколько раз

Сообщение отредактировано: @nto$ka - 17.12.2012 8:50