3 задачи на структуры данных в прологе

@inkognit · Регистрация: 26.11.2010

Задание 1, списки.
Под заданиями приведены примеры для проверки решений.
Рекомендуется во всех заданиях использовать рекурсивную обработку списка, с разделением его
элементов на голову и хвост; можно определять/использовать вспомогательные предикаты.

Осуществить замену n-го вхождения заданного элемента на другое заданное значение
?- replace_nth_elem([1,2,2,2,3,4], 2, 3, 4, X). % заменяем третью двойку на четверку
X = [1,2,2,4,3,4]

Задание 2, строки.
Найдите самую популярную букву в заданной строке.
?- max_char('abcd abc ab a', X).
X = "a"

Задание 3, деревья.
Подсчитайте среднее значение всех чисел, хранимых в заданном бинарном дереве.
?- abg_tree_elem(tr(10, tr(5, nil, tr(6, nil, nil)), tr(13, tr(12, nil, nil), tr(14, nil, nil))), X).
X = '10 5 6 13 12 14'

@Грымзик · 26.11.2010, 21:15

А у Вас есть какие-либо наработки, а то сразу много задач выкладываете? Про дерево может вообще уже и встречалось. И могли бы быть повежливей, у нас тут это является существенным аргументом помогать или нет.

@inkognit · 27.11.2010, 11:58 **[ТС]**

Мне не нужны исходники, просто таких задач не увидел на форуме, решил поделиться

@inkognit 1 / 1 / 0 Регистрация: 26.11.2010 Сообщений: 3
		1
	3 задачи на структуры данных в прологе 26.11.2010, 17:56. Показов 2196. Ответов 2 Метки нет (Все метки) Задание 1, списки. Под заданиями приведены примеры для проверки решений. Рекомендуется во всех заданиях использовать рекурсивную обработку списка, с разделением его элементов на голову и хвост; можно определять/использовать вспомогательные предикаты. Осуществить замену n-го вхождения заданного элемента на другое заданное значение ?- replace_nth_elem([1,2,2,2,3,4], 2, 3, 4, X). % заменяем третью двойку на четверку X = [1,2,2,4,3,4] Задание 2, строки. Найдите самую популярную букву в заданной строке. ?- max_char('abcd abc ab a', X). X = "a" Задание 3, деревья. Подсчитайте среднее значение всех чисел, хранимых в заданном бинарном дереве. ?- abg_tree_elem(tr(10, tr(5, nil, tr(6, nil, nil)), tr(13, tr(12, nil, nil), tr(14, nil, nil))), X). X = '10 5 6 13 12 14' __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 1

@Грымзик 2504 / 1478 / 37 Регистрация: 14.09.2009 Сообщений: 2,740
	26.11.2010, 21:15	2
	А у Вас есть какие-либо наработки, а то сразу много задач выкладываете? Про дерево может вообще уже и встречалось. И могли бы быть повежливей, у нас тут это является существенным аргументом помогать или нет. 1

@inkognit 1 / 1 / 0 Регистрация: 26.11.2010 Сообщений: 3
	27.11.2010, 11:58 [ТС]	3
	Мне не нужны исходники, просто таких задач не увидел на форуме, решил поделиться 0

Опции темы