摘要: (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)) )) 阅读全文