Взято c http://prog.org.ru Как не надо программировать.
Извиняюсь если баян.
Вот программа, занявшая первое место («Best of Show») в этом году. Она вызывается с необязательным числовым параметром (по умолчанию 2) и играет в шахматы. Параметр определяет глубину просмотра (при глубине большей, чем 3, она будет думать очень долго). Ходы задаются двумя восьмеричными числами (откуда куда — см. доску в начале игры, например, «e2-e4» нужно будет вводить как 64 44), в приглашении к приему указывается количество просмотренных ходов и оценка позиций (своей и противника, т.е. Вас).
Правила игры несколько упрощены — пешки превращаются только в ферзей, нет взятия на проходе и длинной рокировки (мне и короткую сделать не удалось), а также контроля правил повторения позиций и 50 ходов.

#include <stdio.h> 
#include <stdlib.h> 
#define m(x)(x<0?-1:!!x) 
#define g tj()-J 
#define a(x)(x<0?-x:x) 
#define h(x)((x)<=K?x:N-(x)) 
#define f 9999 
#define A return 
#define H printf( 
#define R double 
#define U int 
#define V for 
#define b else 
#define u while 
#define B if 
U v,w,Y= -1,W,J,p,F,o=f,M,N,K,X,YY,_,P[f],s(,0); typedef U(*L)(,0); L q[f]; tj(){ 
U S=m(v)+(m(w)<<K,0); B(!S)A J; V(v=W+S; v!=J&&!q[v]; v+=S,0); A v; } k(){ _=K; A 
v?a(v)>1||w-Y||!q[J]:(w-Y&&(w-Y*2||q[W+Y*(N+1)]|| (J>>K)-K+(Y-1)/ 2))||q[J]; 
} z(){ _=5; A v*w||g; } e(){ _= -2; 
A(v*v*v-v||w*w*w-w)&&(J-W-2||(W&N)-4||(W>>K!=(Y-1?N:0))|| 
q[W+1]||q[W+2]||q[W+K]!=z||P[W+K]*Y<0,0); } R VR(){ int PZ=0x7fff; 
A(R)(rand()&PZ)/(R)PZ; } l(){ _=K+1; A(v*w&&a(v)-a(w))||g; } R UC(){ R i=0,d; 
u((i+=d=VR())<1.0,0); A d; } c(){ _= -11; A a(v)-a(w)||g; } I(ur,n,x){ W=ur; 
J=n; B(P[W]!=Y||P[J]==Y)A J+1; v=(J&N)-(W&N,0); w=(J>>K)-(W>>K,0); A 
q[W]()||(x&&QL(W,J,s),0); } TT(W){ v=w=0; A q[W]()+K; } s(){ U j= -1,i; Y=
 -Y; 
V(i=0; i<M; ++i){ B(j<0&&P== -Y&&TT(i)&&_== -2) { j=i; i= -1; } b 
B(j>=0&&!I(i,j,0))A Y= -Y; } A!(Y= -Y,0); } bb(){ _=1; A a(v*w)-2; } uv(){ 
V(v=0; v<f; ++v){ B(h(v>>K)==0){ U S=h(v&N,0); 
q[v]=!S?z:(S==1?bb:(S==2?c:(v&N>K?l:e)),0); } b B(h(v>>K)==1)q[v]=k; b q[v]=0; 
P[v]=!!q[v]*(28-v,0); } } y(){ U G=Y,i; J=0; V(i=0; i<M; ++i){ 
i%8||H"\n%4o ",i,0); B((Y=P=m(P))&& TT(i))H"%c ",_+93+Y*16,0); b H"- ",0); } 
H"\n ",0); do H"%2d",i++&N,0); u(i&N,0); Y=G; H"\n",0); } O(W,J){ 
B((q[J]=q[W])==k&&h(J>>K)==0)q[J]=l; B(q[W]==e)B(J-W==2)O(J+1,J-1,0); b 
B(W-J==2)O(W-1,W+1,0); P[J]=P[W]; q[W]=0; P[W]=0; } QL(W,J,D)L D; { U 
HQ=P[J],YX; L AJ=q[J],XY=q[W]; O(W,J,0); YX=D(,0); O(J,W,0); q[J]=AJ; q[W]=XY; 
P[J]=HQ; A YX; } C(){ U i,j,BZ=0; V(i=0; i<M; ++i){ L Z=q; B(Z){ U 
r=h(i>>K)+h(i&N),G=Y, S=Z==z?88:(Z==k?11 +r+(P<0?N-(i>>K):(i>>K)): 
(Z==l?124-((YY<8&&((i&N)!=K|| (i>>K)!=(P>0?0:N)))?M:0): 
(Z==c?41+r:(Z==e?f-r-r:36+r+r))),0); Y=P; V(j=0; j<M; 
++j)B(!I(i,j,0))S+=(P[j]?5:1,0); BZ+=G==Y?S:-S; Y=G; } } 
B(!(++X&M-1))write(1,".",1,0); A BZ; } PX(){
 U i,Q=0,XP=0,JZ=M*M,E= -f,t,S=o; 
B(!F--)A++F+C(,0); V(i=0; i<JZ; ++i)B(!I(i>>K+K,i&M-1,1)){ Y= -Y; o= -E; t= 
-QL(i>>K+K,i&M-1,PX,0); Y= -Y; B(t>E){ ++XP; Q=i; E=t; B(E>=S) A++F,E; } } 
B(!XP)E=s()?-f+1:0; p=Q; A++F,E; } RZ(){ U i,j,T=0; V(; ; ){ y(,0); o=f; do{ 
H"\n%d %d %d %s ",X,T,C(),s()?"!":">",0); fflush(stdout,0); } 
u(scanf("%o%o",&i,&j)!=2||I(i,j,1),0); O(i,j,0); y(,0); X=0; ++YY; Y= -Y; T=PX(,0); 
i=p>>(K<<1,0); j=p&(M-1,0); B(I(i,j,1)){ H"Rats!\n",0); A; } O(i,j,0); Y= -Y; 
B(T>M*M)H"\nHar har.\n",0); } } main(ac,av)char**av; { long time(),j=time(&j,0); 
R i=0; srand((U)j,0); V(M=0; M<=f; ++M)i+=UC(,0); M=i/100; B(M&3)++M; B(M&1)--M; 
V(N=1; N*N<M; ++N,0); K= --N/2; F=ac>1?atoi(av[1]):2; uv(,0); RZ(,0); }