Formula de Viete(1593)

 disp('Cálculo de Pi por la Fórmula de Viete');
n=input('valor de n:');
d=0;
h=1;
m=1;
for i=1:n
    d=sqrt(2+d);
    m=m*d;
    h=h*2;
    p=(2*h)/m;
end;
fprintf('el valor aproximado de pi es %.8f',p);