main(a,p)char*p;{for(;*++p||!gets(p=&a)-puts();)*p=p[1]?abs(p[1]-*p)+48:0;}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page