function Polygons(a0,b0,radius,n)
%
%
% displaying a polygon.
%

delata_radius=radius/n+2;
radius_local=0;
for j=1:n
    % radius_local=radius_local+delata_radius;
    % radius_local=radius/j;
    radius_local=j*delata_radius;
     if(rem(j,2)==0)
         n_sides=6;
     else
          n_sides=360;
      end
      
      Polygon(a0,b0,radius_local,n_sides);
 
      
end % j