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

Пытался переписать код с паскаля, но ничего не вышло, нужна помощь.

#include <iostream>

using namespace std;

class delet{
public:
void call(){
int i, j, imin, jmin, n;
cout << "n=";
cin >> n;
int a[n][n];
jmin=0;
imin=0;

for(i=0;i<n;i++){
for(j=0;j<n;j++){
cin>>a[i][j];
if(a[i][j]<a[imin][jmin]){
imin=i;
jmin=j;
}
}
}

cout<<"исходная матрица"<<endl;
for(i=0;i<n;i++){
for(j=0;j<n;j++){
cout << a[i][j];
}
cout<<""<<endl;
}

cout<<"минимальный элемент= "<<a[imin][jmin]<<endl;
for(i=imin;i<n-1;i++){
for(j=jmin-1;j<n;j++){
a[i][j]=a[i+1][j];
}
}

for(j=jmin;j<n-1;j++){
for(i=0;i<n-1;i++){
a[i][j]=a[i][j+1];
}
}

n--;
cout<<""<<endl;
for(i=0;i<n;i++){
for(j=0;j<n;j++){
cout<<a[i][j];
}
cout<<endl;
}

}
};

int main(){
delet del;
del.call();
return 0;
}


Код на паскале:

const nmax=15;
var a: array [1..nmax,1..nmax] of integer;
i,j,imin,jmin,n: byte;

begin
repeat
write('n=');
readln(n);
until n in [1..nmax];
imin:=1;
jmin:=1;

writeln('ввод матрицы');
for i:=1 to n do
begin
for j:=1 to n do
begin
read(a[i,j]);
if a[i,j]<a[imin,jmin] then
begin
imin:=i; jmin:=j;
end;
end;
writeln;
end;

writeln('исходная матрица');
for i:=1 to n do
begin
for j:=1 to n do
begin
write(a[i,j]:4);
end;
writeln;
end;

writeln('минимальный элемент=',a[imin,jmin],', в строке ',imin,', в столбце ',jmin);
for i:=imin to n-1 do
for j:=1 to n do
a[i,j]:=a[i+1,j];

for j:=jmin to n-1 do
for i:=1 to n-1 do
a[i,j]:=a[i,j+1];

dec(n);
writeln('матрица после удаления');
for i:=1 to n do
begin
for j:=1 to n do
write(a[i,j]:4);
writeln;
end;
end.

0