%уПОКОЦИСЛЭР ЛщСГР ТИЛчР СТОИВЕъЫМ ТУВАъОУ УПО-ПъМАЙА
clc;
clear all;

%Matrix definition
A = [0  9 -9  3  4  6  4  4   
     8  4  4 10  5  6  4  4 
     2 -7  6  7  4  6  4  4];

%Find mean value of general лatrix (П.В ТОМ ПъМАЙА [4  4; 4  4; 4  4])
K1=1;
K2=3;
L1=7;
L2=8;

s=0;
for i=K1:K2
    for j=L1:L2
        s=s+A(i,j);
    end
end

%хекы то пкHхос тым цяалллым епи то пкгхос тым стгкым. олыс K2-K1 йаи L2-L1 димеи тг диажояа тоус.
%аяа пяосхетоуле +1 циа ма евоуле памта то пкгхос тоус йаи ма циметаи о упокоцислос.
Mean=s/(((K2-K1)+1)*((L2-L1)+1)); 

%Display mean value of general matrix
fprintf('Mean value of general лatrix [4  4; 4  4; 4  4] is: %.2f\n',Mean);





