How Big Are the Pockets? solutions

How Big Are the Pockets? was solved using Pascal by 4 contestants. Solution sizes: average 2922 bytes (shortest: 2417; longest: 3451).

tourist (S, L) (2417 B)
20.

dgozman (S, L) (3080 B)
143.

vepifanov (S, L) (3451 B)
299.

Jby (S, L) (2740 B)