P is Рх

        расст( X : Y, X1 : Y1, Р) :-

                               % Расстояние до короля

                абс_разн( X, X1, Рх),

                абс_разн( Y, Y1, Ру),

                макс( Рх, Ру, Р).

        абс_разн( А, В, С) :-

                А > В,  !,  С is A - В;

                С is В - А.

        макс( А, В, М) :-

                А >= В,  !,  М = А;

                М = В.

        манх_расст( X : Y, X1 : Y1, Р) :-                  % Манхеттеновское расстояние

                абс_разн( X, X1, Рх),

                абс_разн( Y, Y1, Ру),

                P is Рх + Ру.

        простр( Поз, Пр) :-

                                    % Область, в которой "заперт" черный король

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

---

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

---

---

---