сделал 1.16. пришлось подумать, но осилил. Мой код полностью совпал с тем, что я потом нагуглил для проверки (за исключением названия функций):
(define (p-i b n)
(p-iter 1 b n))
(define (p-iter a b n)
(if (= n 0)
a
(if (even? n)
(p-iter a (* b b) (/ n 2))
(p-iter (* a b) b (- n 1)))))
(define (even? a)
(= ... more →
*sicp
asmer
25.01.2012 23:46
asmer
13.01.2012 16:38
Упражнение 1.4.
Заметим, что наша модель вычислений разрешает существование комбинаций, операторы кото-
рых — составные выражения. С помощью этого наблюдения опишите, как работает следующая
процедура:
(define (a-plus-abs-b a b)
((if (> b 0) + -) a b))
asmer
12.01.2012 23:31
Паскаль служит для по-
строения пирамид — впечатляющих, захватывающих статических структур, создаваемых
армиями, которые укладывают на места тяжелые плиты. При помощи Лиспа порождают-
ся организмы — впечатляющие, захватывающие динамические структуры, создаваемые
командами, которые собирают их из мерцающих мириад ... more →
Do you really want to delete ?
Subscribe to *sicp
*sicp is used by:
*sicp is used by:
kb
kb
asmer
asmer
beardog
beardog
kb
kb
asmer
asmer
beardog
beardog