function ex_mapa(x0,gama,n)
x=x0;
xk1=x;
for i=1:n,
   xk = gama*xk1*xk1;
   x=[x; xk];
   xk1=xk;
end

plot(x);
