Сумма элементов строки с минимальным эл. в матрице Опции

[Volonter]

Привет всем, доброго Вам времени суток... У меня есть вот такая задачка... но до меня все никак не доходит как ее решить... помогите чем сможете Буду рад любой помощи ... Да кстати чуть не забыл, само условие:

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

[volvo]

Volonter, на первый взгляд работать она конечно будет (Ну, почти будет ), НО:
1) у тебя будут попутаны столбцы и строки:

     writeln('Vvedite stolbci ',j,' stroci ',i); { <--- Просишь СТОЛБЕЦ #j и СТРОКУ #i  }
     readln(value);
     matrix[j,i]:=value; { <--- Заносишь число в СТРОКУ #j и СТОЛБЕЦ #i !!! }

Хотя дальше в программе обращаешься правильно:

for i:=1 to rows do
begin
     for j:=1 to lines do
     begin
     if matrix[j,i] < min then begin
        min:= matrix[j,i]; { <--- Все верно: строка #j и столбец #i }
        line:=i;
        end;
     end;
end;

2)

     for j:=1 to rows do
     begin
       writeln('Vvedite stolbci ',j,' stroci ',i);
       readln(value); { <--- Зачем ? }
       matrix[j,i]:=value;
     end;

Зачем делать через доп. переменную, когда можно:

     for j:=1 to rows do
     begin
       writeln('Vvedite stolbci ',j,' stroci ',i);
       readln(matrix[j, i]);
     end;

?