```
var a:array[1..100,1..100]of integer;
N, M, i, j, mini, minj, maxi, maxj :integer;
begin
write('N, M -> ');
readln(N, M); {считываем размер матрицы}
write('Input matrix -> ');
for i:=1 to N do for j:=1 to M do
begin
write('A[',i,',',j,'] -> ');
readln(a[i, j]);
end; {считываем саму матрицу}
readln;
mini:=1;
minj:=1;
maxi:=2;
maxj:=2;
for i:=1 to N do for j:=1 to M do if a[i,j] > a[maxi, maxj] then
begin
maxi := i;
maxj := j;
end else if a[i, j] < a[mini, minj] then
begin
mini := i;
minj := j;
end;
writeln('MAX = A[',maxi,',',maxj,'] = ', a[maxi, maxj]);
writeln('MIN = A[',mini,',',minj,'] = ', a[mini, minj]);
readln;
end. ```
Объяснение:
шірік май ол ай ол ай ол ай ол ай ол ай ақ аю оқ екі оқ пісу тұр Мамай екі оқ екі оқ екі оқ екі оқ ең оқ оқ tntntjgjjggjg енді оны грггшоггсо рул бе ән де әр да ел де шет ой шірік май ол ай ол ай ол ай ол ай ол ай ақ аю оқ екі оқ пісу тұр Мамай екі оқ екі оқ екі оқ екі оқ ең оқ оқ tntntjgjjggjg