Ответ в теме: Поиск слов с одной буквой на Prolog

      Комментарии к записи Ответ в теме: Поиск слов с одной буквой на Prolog отключены
#2648

Здравствуйте. Что именно у вас не получается и на каком диалекте пролога нужно решение задачи?

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

check_single_g(String):-
string_to_words(String, Words),
member(Word, Words),
count(Word, 0'g, 1).

Я привел код для SWI Prolog, но на форуме есть предикаты, с помощью которых вы сможете адаптировать решение под любой другой диалект. Если вы пишите на Turbo Prolog, то предварительно нужно строку преобразовать в список символов и добавить в свою программу функцию member. 0'g в моей программе задает искомый символ (это не тоже самое, что «g»), т.к. последний вариант в SWI Prolog задаст список из одного символа, а в Turbo Prolog — специальный тип строки.