Ой, какое форматирование ужасное получилось.
Приведу полный листинг: http://pastebin.com/m6e859290

Потому что if - особая форма. Второе выражение if вычисляется только если первое не верно. В cond жеиспользуется аппликативный порядок исчислений и потому вычисляются оба выражения.

В случае
(define (sqrt-iter guess x)
(new-if (good-enough? guess x)
guess
(sqrt-iter (improve guess x) x))
)

выполнение функции просто никогда не завершится, что может приводить к разным результатам, в зависимости от интерпретатора/компилятора.

>>487
/s/первое не верно/условие не верно

>>487
Спасибо тебе Доброкодер, всё понял.

>>485
(Де)мотиватор порадовал. Сохраню

Продолжение банкета:

Функция f определяется правилом: f (n) = n, если n < 3, и f (n) = f (n − 1) + f (n − 2) + f (n − 3),
если n ≥ 3. Напишите процедуру, вычисляющую f с помощью рекурсивного процесса. Напишите
процедуру, вычисляющую f с помощью итеративного процесса.


Рекурсивный процесс очевиден совсем:
http://pastebin.com/m1adabfb0

А итеративный судя по всему следует делать как с числами Фибоначчи:
http://pastebin.com/m114d4730

Но как это сделать? Сколько надо аргументов нужно передавать и хули с ними там делать. Мне не очень понятно что вооще эта формула делает. Я её ручной трассировкой прогонял и смотрел результаты, но смысл не понел.

Решение найдено
http://pastebin.com/m5f565588

>>508
молодец, а слабо сделать то же самое за логарифмическое от n время?
(к сожалению, на схеме это будет неудобно)

Кстати... так, пища для размышления.
С использованием твоей функции f-iter...

(define (print i) (display i) (display " "))
(define (x-iter i)
   (if (= (modulo (f-iter 3 1 3 i) i) 1) (print i))
   (if (< i 100) (x-iter (+ i 1)))
)
(x-iter 1)

Как ты думаешь, что оно делает? :)

Это схема штоле? А чего не на CL?

Я оставил закладку на будущее, и вот сейчас щёлкнул посмотреть.
Это божественно! Пожалуй, я брошу Practical Common LISP на время.

>>533
CL - для быдла. Ио слишком раздут.

>>547
Луговский теперь быдло. Ну да, конечно.
На самом деле схема для обучения, а CL, Closure и т.п. — ынтырпрайз. У CL просто поддержка больше, но если не нужно быстро, то лучше развивать Scheme.

>>548

> CL, Closure и т.п. — ынтырпрайз

смищно. энтерпрайз - это ява. CL используется только несколькими компаниями по тем или иным причинам.

> Луговский теперь быдло.

Он всегда был быдлом.

Схема лучше тем, что развивается и проста. CLисперы же погрязли в онанизме на свой язык.

>>549

> энтерпрайз - это ява.

Closure тоже на JVM и с Java прекрасно совмещается. Так что она ближе к энтерпрайзу, чем Scheme. Scheme же ни с чем толком не совместима, разве что Guile использовать, а ядро писать на C.

> > Луговский теперь быдло.

> Он всегда был быдлом.

Быдлом он уж точно не был. Есть люди намного умнее, но и он не идиот.

>>548

> Луговский теперь быдло.

Говоришь так, словно когда-то он таким не был.

>>551
Быдло про лисп даже и не знает зачастую. Так что он все-таки выше.

>>550

> Closure тоже на JVM и с Java прекрасно совмещается.

Лол, на closure фапают только лисперы. В ынтерпрайзе она нах никому не нужна.

> Scheme же ни с чем толком не совместима, разве что Guile использовать, а ядро писать на C.

Лол. То, где ядро написано на клиспе, всегда можно написать его и на схеме, не смеши.

> Быдлом он уж точно не был. Есть люди намного умнее, но и он не идиот.

"Быдло" и "идиот" понятия ортогональные.

Скажите, в оп-пике надпись относится к Джону, или он её как бы произносит?

>>556
А вот это мой мальчик ты должен сам для себя решить :3

Ужас, основного идеолога "антибыдла" причислили к созданному им образу врага. Если VSL быдло, то в данном треде просто архи-быдло.

Пиздец. Матерящийся, полоумный, нетерпимый быдло-максималист у нас идеолог "антибыдла".

Пиздец.

>>563

> Матерящийся, полоумный, нетерпимый быдло-максималист

Bitches don't know about mah trolling? Луговский — хороший, годный тролль. Грубоватый, иногда толстоватый, но крайне эффективный.

>>564
Троллинг для быдла.

>>565
Недоказуемо. Но многие считают, что троллинг — это весело.
И давай не будем разводить холивар, "хорошо", "плохо", "для быдла", "для небыдла" — понятия относительные.

>>563

> Матерящийся, полоумный, нетерпимый

Ты за формой не видишь сути. Для чанов это страшный грех.
Алсо, ты, надеюсь, прочитал до конца тот эпичный С++ тред на sql.ru прежде чем делать такие выводы?

А где раньше появился мем "быдло"? На чанах или у vsl?

>>568
Он его стал применять до того, как вообще появились русские чаны.

>>569
Ну тогда >>563 вообще страшно сфейлил со своим недовольством идеологом "антибыдла".

>>570
Спасибо, Кэп!

>>568
в 19 веке, ёпт. Ты правда такой тупой или притворяешься? Только не надо утверждать, что ваш разлюбезный луговский придал темину "быдло" какое-то другое значение.


Алсо, >>568>>569>>570>>571 Сёмочка?

>>572
Какой агрессивный. Да еще и троллефоб. Ну точно вылитое небыдло.

>>572
Тем не менее никто, кроме битардов и vsl так этим словом не злоупотреблял. И судя по хронологии битарды переняли этот "мем" у vsl.

>>574
Ну таки ради истины стоит заметить, что форсил он его в основном на ЛОРе, коий имеет непустое пересечение с анонимусом АИБ.

Тест

> Потому что if - особая форма. Второе выражение if вычисляется только если первое не верно. В cond жеиспользуется аппликативный порядок исчислений и потому вычисляются оба выражения.

Автохуй! Почитай документацию по cond и ты поймешь, что причина stack-overflow не в нем. Аппликативный порядок вычисления используется в вызове функции, поэтому когда ты используешь свой new-if вычисляется и первое условие и второе, выбирается только возвращаемое значение. Следовательно sqrt-iter будет всегда вызывать себя.