Senate Evacuation solutions

Senate Evacuation was solved using Pascal by 3 contestants. Solution sizes: average 1483 bytes (shortest: 1424; longest: 1543).