Демонстрация нахождения длины строки.

/* 15.6.2013
Среда - EZY Prolog
Нахождение длины строки - предикат str_len(строка, длина_строки)  */
 
predicates
 
fing_string_length
 
clauses
 
fing_string_length :- str_len("Санкт-Петербург", Length), nl,nl,
write(" Санкт-Петербург"),
nl,nl,
write(" Длина строки = ", Length).
 
goal
 fing_string_length.

Результат:

Санкт-Петербург
Длина строки = 15

!!Рекомендуем: Что должен знать современный человек? ⇒ Семейная Энциклопедия Здоровья ⇒ Самоанализ. Работа над собой ⇒ Оглавление ⇒ Главная сайта