A.I. War solutions

A.I. War was solved using Pascal by 2 contestants. Solution sizes: average 2571 bytes (shortest: 2111; longest: 2802).