可以看看我这里的解法[4.19](https://github.com/soulomoon/SICP/blob/master/Chapter4/Exercise4.19.scm)
可以看看我这里的解法4.19