S=[500,2150;4500,3450;2100,900;3300,2300;7800,1150;3000,900;4500,2300;6000,2400;2400,1200;2400,2400;5400,3000;9600,4500;2100,1500];
x=[800,800;600,600;400,400;300,300;600,300;300,600];
for j=1:6
for i=1:13
a(i,j)=floor(S(i,1)/x(j,1));
b(i,j)=floor(S(i,2)/x(j,2));
end
end
for j=1:6;
for i=1:13
if a(i,j)~=ceil(S(i,1)/x(j,1))&b(i,j)~=ceil(S(i,2)/x(j,2))
n(j,i)=a(i,j)*b(i,j)+a(i,j)+b(i,j);
elseif a(i,j)==ceil(S(i,1)/x(j,1))&b(i,j)~=ceil(S(i,2)/x(j,2))
n(j,i)=a(i,j)*b(i,j)+a(i,j);
elseif a(i,j)~=ceil(S(i,1)/x(j,1))&b(i,j)==ceil(S(i,2)/x(j,2))
n(j,i)=a(i,j)*b(i,j)+b(i,j);
elseif a(i,j)==ceil(S(i,1)/x(j,1))&b(i,j)==ceil(S(i,2)/x(j,2))
n(j,i)=a(i,j)*b(i,j);
end
end<