Different Sum solutions

Different Sum was solved using Pascal by 1 contestant. Solution sizes: average 4228 bytes (shortest: 3662; longest: 4795).