Collecting Cards solutions

Collecting Cards was solved using Pascal by 7 contestants. Solution sizes: average 1097 bytes (shortest: 763; longest: 1503).