Print PI

no-cycle-recursive.c

#include <stdio.h>
#define A(x) x;x;x;x;x;x;x;x;x;x;
int main (void)
{
    int n = 1;
    A(A(A(printf ("%d ", n++))));
    return 0;
}

pi.c

int a=10000,b,c=2800,d,e,f[2801],g;
main(){
    for(;b-c;)f[b++]=a/5;
    for(;d=0,g=c*2;c-=14,printf("%.4d",e+d/a),e=d%a)
    for(b=c;d+=f[b]*a,f[b]=d%--g,d/=g--,--b;d*=b);
}