이 문제는 리스트를 인자로 받아 모든 원소를 제곱하여 다시 리스트로 내놓는

square-list 프로시저를 만드는 문제입니다.

이 문제는 빈칸 채우기라 그리 어렵지 않았습니다.

참조

Structure and Interpretation of Computer Programs 2/E - Page 138

(define (square x) (* x x))

; map
(define (map proc items)
  (if (null? items)
      null
      (cons (proc (car items))
            (map proc (cdr items)))))

; square-list
(define (square-list1 items)
  (if (null? items)
      null
      (cons (square (car items)) (square-list1 (cdr items)))))

(define (square-list2 items)
  (map square items))

; execute
(square-list1 (list 1 2 3 4))
(square-list2 (list 1 2 3 4))

크리에이티브 커먼즈 라이선스

이 저작물은 크리에이티브 커먼즈 코리아 저작자표시-비영리-변경금지 2.0 대한민국 라이선스에 따라 이용하실 수 있습니다.