More Pascal programs