L-99 の一問目を解いてみた
(define my-last (lambda (lis) (if (null? lis) #f (if (null? (cdr lis)) (car lis) (my-last (cdr lis))))))
入れ子のリスト考えなくていいのかな?
と思ったけど、リストの中身が入れ子だろうが最後の要素は最後の要素なのですね
'(a b c '(1 2 3))
最後の要素は '(1 2 3) うん、当たり前のことなのにちょっと考えてしまった。
(define my-last (lambda (lis) (if (null? lis) #f (if (null? (cdr lis)) (car lis) (my-last (cdr lis))))))
入れ子のリスト考えなくていいのかな?
と思ったけど、リストの中身が入れ子だろうが最後の要素は最後の要素なのですね
'(a b c '(1 2 3))
最後の要素は '(1 2 3) うん、当たり前のことなのにちょっと考えてしまった。