Программирование на языке Пролог для искусственного интеллекта



         

Обработка символов - часть 2


Есть три альтернативы, которые соответствуют следующим случаям: символ является точкой, пробелом или буквой. Взаимное исключение этих трех альтернатив обеспечивается в программе отсечениями:

        сжатие :-

                get0( С),

                put( С).

                сделатьостальное( С).

        сделатьостальное( 46) :-  !.

                                    % 46 -АSСII-код точки, Все сделано

        сделатьостальное( 32) :-  !,

                                    % 32 - ASCII-код пробела

                get( С),

                put( С),

                сделатьостальное( С).

        сделатьостальное( Буква) :-

                сжатие.




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