私はSchemeでこのプログラムを実装するのに少し問題がありますが、私はそこまでの道のりの90%だと思います。残念ながら、これは宿題なので、少し漠然としている必要があります。(ABCD)に戻りたい(BD)。しかし、safe-carに引数として渡されたオブジェクト()はペアではないというエラーが発生します| 「これは私のコードです:
(DEFINE (other_el lis)
(COND
(( NULL? lis ) '())
((LIST? lis)
(append (CADR lis) (other_el (CDR lis))))
(ELSE (show " USAGE: (other_el [LIST])"))))