x = 34100;
orbita = 0;
itera = 160;
n = 1;

aguas=zeros(itera,1);
while n<=itera
  x = cos(x);
  aguas(n) = x;
  n += 1;
end
# converge siempre hacia 0.73909!!


# en otro orden de ideas
n=1;
x=pi;
a = 16;
while n<=itera
  x = 0.5*(x+a/x);
  n+=1
end
