Turbo pascal (47/48)

Turbo pascal