Fractiles solutions

Fractiles was solved using Pascal by 8 contestants. Solution sizes: average 1048 bytes (shortest: 319; longest: 3399).