1 /* 2 * mini.c 3 * 4 * Calcule 15000 décimales de Pi 5 * Très petit 6 * 7 */ 8 9 #include <stdio.h> 10 11 a[52514],b,c=52514,d,e,f=1e4,g,h; 12 main(){for(;b=c-=14;h=printf("%04d",e+d/f)) 13 for(e=d%=f;g=--b*2;d/=g)d=d*b+f*(h?a[b]:f/5),a[b]=d%--g;}