Fair and Square solutions

Fair and Square was solved using Pascal by 110 contestants. Solution sizes: average 1605 bytes (shortest: 276; longest: 6853).

The list below is sorted by solution size. You can also sort by ranking.