Студопедия

Главная страница Случайная страница

КАТЕГОРИИ:

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






Удаление элемента из списка






14. Разберем задачу удаления из списка, элементами которого являются названия дней недели, указанного элемента.

15.Создайте новый проект:

DOMAINS

list=symbol*

 

PREDICATES

del(symbol, list, list)

 

CLAUSES

del(X, [X|L], L).

del(X, [Y|L], [Y|L1]): - del(X, L, L1).

 

GOAL

L=[пн, вт, ср, чт, пт, сб, вс], write(“L=”, L), nl,

write(“X=”), readln(X),

del(X, L, L1), write(“L1=”, L1),!;

write(“Элемент отсутствует в списке”), nl.

Результат выполнения программы (рис. 9, 10):

1-й случай:

L=[" пн", " вт", " ср", " чт", " пт", " сб", " вс" ]

X=ср

L1=[" пн", " вт", " чт", " пт", " сб", " вс" ]

 

Рис. 9. Удаление из списка дней недели среды

 

2-й случай

L=[" пн", " вт", " ср", " чт", " пт", " сб", " вс" ]

X=пр

Элемент отсутствует в списке

 

Рис. 10. Вывод результата программы при удалении несуществующего в списке элемента

 

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

17. Создайте проект следующего содержания:


Поделиться с друзьями:

mylektsii.su - Мои Лекции - 2015-2024 год. (0.006 сек.)Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав Пожаловаться на материал