напишите программу которая находит минимальный и максимальный элементы матрицы и их индексы

#include "stdafx.h"
#include "iostream"
#include "conio.h"
using namespace std;
int i,j;
int n,mem; 
j=n;
int B[n];
for(i=0;i<n;i++)
{
mem=B[i];
B[i]=B[j];
B[j]=mem;
j--;
}
min=A[0][0];
max=A[0][0];
for(i=0;i<k;i++)
{
for(j=0;jmax)
{
A[i][j]=max;
}
if(A[i][j]<min)
{
A[i][j]=min;
}
}
}
for(i=0;i<k;i++)
{
for(j=0;j<k;j++)
{
if(min==A[i][j])
{
A[i][j]=max;
}
if(max==A[i][j])
{
A[i][j]=min;
}
}
}
_getch();

return 0;
}

вот для одномерного, переделай на матрицу
program zadanie4;
uses crt;
var
i:integer;
max,min,maxi,mini,m:integer;
a:array[1..10] of integer;
begin
clrscr;
randomize;
for i:=1 to 10 do
a[i]:=random(51);
writeln('ischodni massiv');
writeln('-----------------');
for i:=1 to 10 do
write(a[i]:5);
writeln; writeln;
maxi:=1; max:=a[1];
for i:=2 to 10 do
begin
if a[i]>max then
begin
max:=a[i];
maxi:=i;
end;
end;
{m:=1;
for i:=2 to 10 do
if a[i]<a[m] then m:=i;
writeln(m:4,a[m]:4); }
mini:=1; min:=a[1];
for i:=2 to 10 do
if a[i]<min then begin
mini:=i; min:=a[i];
end;
write('maximalnoe = '); writeln(max);
write('minimalnoe = '); writeln(min);
write('maximalnoe i = '); writeln(maxi);
write('minimalnoe i = '); writeln(mini);
writeln('konec zadachi');
readln;
end.

Решение на Pascal ABC

var i, j, n, max, min: integer;
a: array [1..100,1..100] of integer;
begin
max:=0;
min:=100;
write ('введите n = ');
readln (n);
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random (90) + 10;
write (a[i,j]:4);
if a[i,j] > max then max:=a[i,j];
if a[i,j] < min then min:=a[i,j];
end;
writeln;
end;
for i:=1 to n do
for j:=1 to n do
begin
if a[i,j]=max then writeln ('max=',max, ' = [',i,',',j,']');
if a[i,j]=min then writeln ('min=',min, ' = [',i,',',j,']');
end;
end.

а в чем проблема? в двойном цикле проходим по матрице, сравниваем текущий элемент с предыдущим максимумом и минимумом, если больше (меньше) соответствующей переменной, то перезаписываем переменную для максимума/минимума и индекс. В конце возвращаем их (в виде кортежа или списка, например)