Цитата:
Сообщение от Kampuchiec
Второе задание не надо. Объясните как найти сумму всех элементов вокруг максимального в матрице?
|
Примерно так:
Код:
S:=0;
for i:=Imax-1 to Imax+1 do
for j:=Jmax-1 to Jmax+1 do
if (i>0) and (i<=N) and (j>0) and (j<=M) and Not((i=Imax) and (j=Jmax)) then
S:=S+a[i,j]