i=4;q;main(a,l){for(printf("%*d\n%.*s\n9 | %d\n",l,a/9,l=log10(a)+5," ___________",a=atoi(gets(&q)));printf("%*c",++i,q)<l;printf("0%*c-%3d%*c__\n",2-i,10,q%8*9,-i,10));}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).