Update all new Tasks
This commit is contained in:
parent
00a190b0a6
commit
91df62d461
5697 changed files with 93386 additions and 804 deletions
|
|
@ -0,0 +1,11 @@
|
|||
;;; Collecting lambdas in a tail-recursive function.
|
||||
(define (build-list-of-functions n i list)
|
||||
(if (< i n)
|
||||
(build-list-of-functions n (+ i 1) (cons (lambda () (* (- n i) (- n i))) list))
|
||||
list))
|
||||
|
||||
(define list-of-functions (build-list-of-functions 11 1 '()))
|
||||
|
||||
(map (lambda (f) (f)) list-of-functions)
|
||||
|
||||
((list-ref list-of-functions 8))
|
||||
|
|
@ -0,0 +1,2 @@
|
|||
(1 4 9 16 25 36 49 64 81 100)
|
||||
81
|
||||
Loading…
Add table
Add a link
Reference in a new issue