find_submatrix_with_min_sum(dodatni_5)

A=[8 8 10 10; 1 1 2 3;9 2 8 8; 1 2 10 10];%1 2 10 10
disp(A);
%A=[1 1; 2 2]
disp(A')
disp(daj_min(A));
function [B]=daj_min(A)
    [m,n]=size(A);
    %%B=zeros(m/2,n/2);
    T=A';
%     disp(A);
%     disp(T);
%     disp(T(1:0+m/2,1:0+n/2));

    suma=sum(sum(T(1:0+m/2,1:0+n/2)));
    kol=1,red=1;

    for i=1:m/2+1
          for j=1:n/2+1
              tren_suma=sum(sum(T(i:i-1+m/2,j:j-1+n/2)));
%             disp(T(i:i-1+m/2,j:j-1+n/2));
%             disp(tren_suma);
%             fprintf("Sljedeca %d\n",i);
            if(tren_suma<suma)
                suma=tren_suma;
                kol=j;red=i;
            end
         end
    end
    %disp(suma);
    B=T(red:red-1+m/2,kol:kol-1+n/2);
end