tanakaBox https://blog.hatena.ne.jp/tanakaBox/ ボクノス https://boxnos.hatenablog.com/ Scheme accumulateと書くのが面倒なので、互換性のあるsrfi-1のfold-rightを使います。ついでにsrfi-26もお試しで。 問題 2.23 穴埋め問題。軽い軽い。 (define (map p sequence) (fold-right (lambda (a b) (cons (p a) b)) '() sequence)) (map (cut + 10 <>) (iota 10)) ; (10 11 12 13 14 15 16 17 18 19) (define (append seq1 seq2) (fold-right cons seq2 seq1)) (append (l… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fboxnos.hatenablog.com%2Fentry%2F20071022%2F1193058704" title=" SICPを読む(55) 問題 2.33 - 2.35 accumulateの問題 - ボクノス" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2007-10-22 22:11:44 rich https://boxnos.hatenablog.com/entry/20071022/1193058704 1.0 100%