char l['RP']="GIKGOPAMU@",*I,*O,_;main(){for(I=O=99+l;_ =l[_/2&30|*(*I++=_%2|48,puts(O),I-=_&2)&1];I<O&&--O);}Selitys
int a[3302],b= 3301,* c=a,d ,e,f; main(){ for(e= b;--e;* c++=1); *c=2;for (d=2001;d--;printf("%05d", f))for( c=a,e= b;e;f /=e--) {f+=*c *10000 ;*c++=f%e;}}Game of life, simppeli versio.