問題2.40 – SICP(計算機プログラムの構造と解釈)その55

問題2.40 (define (unique-pairs n) (flatmap (lambda (i) (map (lambda (j) (list i j)) (enumerate-interval 1 (- i 1 [...]…続きを読む

2.2.3 写像の入れ子 – SICP(計算機プログラムの構造と解釈)その54

2.2.3 写像の入れ子 正の整数 n があり、1<=j<i<=n である異なる正の整数 i と j の順序対で、i+j が素数になるものをすべて見つける。 n = 6 の場合 i<=n の各整数 [...]…続きを読む

問題2.39 – SICP(計算機プログラムの構造と解釈)その53

問題2.39 (define (reverse sequence) (fold-right (lambda (x y) (append y (list x))) () sequence)) (reverse (list [...]…続きを読む

問題2.38 – SICP(計算機プログラムの構造と解釈)その52

問題2.38 fold-right と fold-left 手続き (define (fold-right op initial sequence) (if (null? sequence) initial (op (c [...]…続きを読む

問題2.37 – SICP(計算機プログラムの構造と解釈)その51

問題2.37 accumulate 手続きと accumulate-n 手続き (define (accumulate op initial sequence) (if (null? sequence) initial [...]…続きを読む

問題2.36 – SICP(計算機プログラムの構造と解釈)その50

問題2.36 (define (accumulate-n op init seqs) (if (null? (car seqs)) () (cons (accumulate op init (map car seqs)) [...]…続きを読む

問題2.35 – SICP(計算機プログラムの構造と解釈)その49

問題2.35 (map <??> <??>) 部分でリストの葉の数を数える。(葉の数を表す数のリストを返す) そのリストの各値を足す。 (define (count-leaves t) (accu [...]…続きを読む

問題2.34 – SICP(計算機プログラムの構造と解釈)その48

問題2.34 (define (accumulate op initial sequence) (if (null? sequence) initial (op (car sequence) (accumulate op [...]…続きを読む

問題2.33 – SICP(計算機プログラムの構造と解釈)その47

問題2.33 アキュムレータ手続き (define (accumulate op initial sequence) (if (null? sequence) initial (op (car sequence) (ac [...]…続きを読む

問題2.32 – SICP(計算機プログラムの構造と解釈)その46

問題2.32 subsets が 引数s の全ての部分集合のリストを返すとすると、rest は s の先頭要素を除いた集合の全ての部分集合のリスト。 s の全ての部分集合のリストは、rest と rest の各要素に s [...]…続きを読む
Page 1 of 111234510...Last »
↑ページの先頭へ