Training Pascal compiler