Getting the Digits solutions

Getting the Digits was solved using Pascal by 8 contestants. Solution sizes: average 2551 bytes (shortest: 1020; longest: 7203).