массивы

[maks22]

Дан квадратный массив 10 на 10.Опишите алгоритм вычесления суммы элементов строки в которой расположен элемент с максимальным значением

[VIK_aka_TOR]

находим строку с макс элементом

max:= a[1,1];
for i:=1 to 10 do
for j:=1 to 10 do
if max < a[i,j] then
begin
maxi := i;
max := a[i,j];
end;

затем вычисляем сумму элементов строки

sum := 0;
for j:=1 to 10 do
sum := sum + a[maxi, j];