打印蛇行方阵(1~36)

         /**********************************************/
         /* 程序名称：打印蛇行方阵(1~36)               */
         /* 程序作者：Knocker                          */
         /* 完成日期：2004.11.14.                      */
         /* 编译环境：Windows me + Win-TC 1.9.1        */
         /* Email   : [e-mail]                */
         /**********************************************/

 

#include <stdio.h>
#include <conio.h>
int a,b,c,d,e,f,t;main(_){!(_-1)&&(d=(e=(f=(c=b=((a=(t=1)+t)*a+t))*a)*a)-f-c+t);_<37&&(t==1?(a+=3,a==e&&(e-=3,t=2)):t==2?(b++,b==f&&(f--,t=3)):t==3?(a-=3,a==c&&(c+=3,t=0)):t==0?(b--,b==d&&(d++,t=1)):0,gotoxy(a,b),printf("%3d",_),_++)&&main(_);}