(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
猜你喜欢
转载自www.cnblogs.com/hjj-fighting/p/10940793.html
今日推荐
周排行