code golf 難しい

anarchy golf の e を小数点以下 100 桁まで出力するプログラム。

i,j,a[17],b[17],x=1e7;main(){*a=*b=100;for(;++i<75;j=0)for(;j<16;){b[j+1]+=b[j]%i*x;b[j]/=i;a[j-1]+=(a[j]+=b[j])/x;a[j++]%=x;}for(;j<15;)printf("%d",a[j++]);}

答えをそのまま出力した方が短い。
あと、使用可能言語に PostScript を加える予定はありませんか。

追記: 5 バイト縮んだけどまだ 153 バイト。
i,j,a[17],b[17],x=1e7;main(){for(*a=*b=100;++i<75;j=0)for(;j<16;b[j+1]+=b[j]%i*x,b[j]/=i,a[j-1]+=(a[j]+=b[j])/x,a[j++]%=x)i<74||j>14?:printf("%d",a[j]);}
i,a[17],b[17],*p=a,*q,x=1e7;main(){for(*a=*b=100;++i<75;p=a)for(q=b;p<a+16;q[1]+=*q%i*x,*q/=i,p[-1]+=(*p+=*q++)/x,*p++%=x)i<74||p>a+14?:printf("%d",*p);}

追記: PostScript が加わりました。ありがとうございます。