Pascal Sample Programs