(新人求助)求解一道pascal题: