0

R5RSから4.2.4繰り返し-

(let ((x '(1 3 5 7 9)))
  (do ((x x (cdr x))
       (sum 0 (+ sum (car x))))
      ((null? x) sum))) 

cdr-との使用法は何ですかcar

そして、これで何が起こるかx-

(do ((x x (cdr x))
           (sum 0 (+ sum (car x))))
          ((null? x) sum))
4

1 に答える 1

1
  • car = first (リストの最初の要素と同様)
  • cdr = rest (リストの最初の要素以外のすべてと同様)

ループは、リスト内の項目を追加します。

于 2012-12-16T17:42:13.413 に答える