Integer pascal (47/48)

Integer pascal