%carico matrice
fprintf('inserisci il numero di righe');
righe=input('');
fprintf('inserisci il numero di colonne');
colonne=input('');
for i=1:righe
    for b=1:colonne
        fprintf('inserisci la posizione %d, %d',i,b);
        matrice(i,b)=input('');
    end
end
%individuo MIN e MAX
MIN=0;
posizione_min_righe=0;
posizione_min_colonne=0;
MAX=0;
posizione_max_righe=0;
posizione_max_colonne=0;
for i=1:righe
    for b=1:colonne
       if matrice(i,b)>MAX
           MAX=matrice(i,b);
           posizione_max_righe=i;
           posizione_max_colonne=b;
       else if matrice(i,b)<MIN
               MIN=matrice(i,b);
               posizione_min_righe=i;
               posizione_min_colonne=b;
           end
       end
    end
end
fprintf(' il valore minimo è %d \nil valore massimo è %d',MIN,MAX);
%dimensione matrice estratta
if posizione_min_righe>posizione_max_righe
    righe_estratta=posizione_min_righe-posizione_max_righe+1;
    riga_minore=posizione_max_righe;
    riga_maggiore=posizione_min_righe;
else
    righe_estratta=posizione_max_righe-posizione_min_righe+1;
    riga_minore=posizione_min_righe;
    riga_maggiore=posizione_max_righe;
end
if posizione_min_colonne>posizione_max_colonne
    colonne_estratta=posizione_min_colonne-posizione_max_colonne+1;
    colonna_minore=posizione_max_colonne;
    colonna_maggiore=posizione_min_colonne;
else
    colonne_estratta=posizione_max_colonne-posizione_min_colonne+1;
    colonna_minore=posizione_min_colonne;
    colonna_maggiore=posizione_max_colonne;
end
%carico matrice estratta
for i=1:righe_estratta
    for b=1:colonne_estratta
        comp_riga=riga_minore+i-1;
        comp_colonna=colonna_minore+b-1;
        s(i,b)=matrice(comp_riga,comp_colonna);
    end
end
disp(s);