(define (append a b ) (if (null? a )b (cons (car a) (append (cdr a) b)))) (define (reverse l) (append (reverse (cdr l)) (list (car l)) ))
scip 练习2.18
原文：https://www.cnblogs.com/hjj-fighting/p/10940793.html
