Petar Kapriš
a697f52405
To be noted: the drawing in exercise 1.14 is unfinished. I did it in a notebook, but haven't yet had the time to put it in a txt file.
5 lines
145 B
Scheme
5 lines
145 B
Scheme
#lang sicp
|
|
|
|
(define (solution n k)
|
|
(cond ((or (= n 1) (= k 1) (= k n)) 1)
|
|
(else (+ (solution (- n 1) (- k 1)) (solution (- n 1) k)))))
|