найти сумму элементов строки

[jenja]

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


минимальный элемент я нашала, а как записать, чтобы он складывал именно те элементы, где находится минимальный элемент?

[Dj_smart]

Вот дерзай:

var n,m,min,nmin:word;
min:=65530;
for n:=1 to 25 do begin
  for m:=1 to 25 do begin
    if mas[n,m]<min then begin
      nmin:=n;
      min:=mas[n,m]
    end;
  end;
end;

Результат nmin-твое значение

[puporev]

минимальный элемент я нашала, а как записать, чтобы он складывал именно те элементы, где находится минимальный элемент?

Если вы нашли минимальный элемент, то должны были найти и номер строки, где он находится.
Это пишется так:

min:=a[1,1];imin:=1;
for i:=1 to n do
for j:=1 to n do
if a[i,j]<min then
    begin
      min:=a[i,j];
      imin:=i;
    end;

Сейчас ищем сумму в строке:

sum:=0;
for j:=1 to n do
sum:=sum+a[imin,j];

Вроде все.