类Pascal解释器，学习用