Тупиковое дерево

                продолжить( П, д( В, F/G, [Д1, ДД]), Предел, Дер1,

                                                            ЕстьРеш1, ЕстьРеш, Реш).

        расширить( _, д( _, _, [ ]), _, _, никогда, _ ) :-  !.

                                   % Тупиковое дерево - нет решений

        расширить( _, Дер, Предел, Дер, нет, _ ) :-

                f( Дер, F), F > Предел.

          % Рост остановлен

        продолжить( _, _, _, _, да, да, Реш).

        продолжить( П, д( В, F/G, [Д1, ДД]), Предел, Дер1,

                                                           ЕстьРеш1, ЕстьРеш, Реш):-

                ( ЕстьРеш1 = нет, встав( Д1, ДД, НДД);

                  ЕстьРеш1 = никогда, НДД = ДД),

                опт_f( НДД, F1),

Содержание  Назад  Вперед

---

Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий

---

---

---