% function Squares_Concentric(a0,b0,length0,delta,n) a=a0; b=b0; length=length0; for i=1:n a=a0+(i-1)*delta; b=b0+(i-1)*delta; length=length0-2*(i-1)*delta; square(a,b,length); end