Cómo programar una aproximación de pi usando Fortran 95

i=1;

flag=1;

while(1/i>1e-7) % se cambiará a 1e- 6 Hace que los cálculos sean más rápidos, pero menos precisos

sum=sum+flag*1/i;

flag=flag*-1;

i=i+2;< / p>

end

result=sum*4;

vpa(result,10) %El número de dígitos que se muestran entre paréntesis