Лебедева Н.С. Методическое пособие по программированию на Turbo Prolog
Подождите немного. Документ загружается.
71
Лабораторная работа 3
Структуры, окна, звук
Цель и содержание работы
Целью работы является приобретение навыков в представлении
структурных объектов данных и в управлении ими. Разработать
программу в соответствии с индивидуальным заданием, которая должна
содержать меню, создаваемое при помощи окон, простые музыкальные
фрагменты. Вариант индивидуального задания выбирается в
соответствии с номером по журналу.
Индивидуальные задания
1. Вводятся координаты
N
точек. Определить уравнение прямой
y
=
kx
+
b
, на которой лежит наибольшее количество введенных
точек. Найти все возможные решения.
2. Вводятся координаты
N
точек. Найти уравнения сторон треугольника
с вершинами из множества введенных точек, имеющего наибольшую
площадь.
3. Вводятся координаты
N
точек. Найти уравнения сторон невырож-
денного треугольника с вершинами из множества введенных точек,
имеющего наибольший периметр.
4. Вводятся координаты
N
точек. Найти уравнения сторон треугольника
с вершинами из множества введенных точек, такого, что внутри него
лежит наибольшее число введенных точек.
5. Вводятся координаты
N
точек. Найти уравнения сторон невырож-
денного четырехугольника с вершинами из множества введенных
точек, имеющего наибольшую площадь.
6. Вводятся координаты
N
точек. Найти уравнения сторон невырож-
денного четырехугольника с вершинами из множества введенных
точек, имеющего наибольший периметр.
7. Вводятся координаты
N
точек. Найти уравнения сторон невырож-
денного четырехугольника с вершинами из множества введенных
точек, такого, что внутри него лежит наибольшее число введенных
точек.
8. Вводятся координаты
N
точек. Определить максимальное число
параллельных прямых и их уравнения, таких, что каждая прямая
проходит по крайней мере через 2 точки из множества введенных
точек.
72
9. Вводятся координаты
N
точек. Определить: есть ли среди введенных
точек 3 точки, являющихся вершинами равностороннего треуголь-
ника, и в случае успеха получить уравнения сторон этого треуголь-
ника. Найти все возможные решения.
10. Вводятся координаты
N
точек. Найти среди них точку с наименьшей
суммой расстояний до остальных точек и точку с наибольшей
суммой расстояний до остальных точек.
11. Вводятся координаты
N
точек. Найти наименьшую длину ломанной,
соединяющей все точки и вывести путь, по которому происходит это
соединение.
12. Вводятся координаты
N
точек. Найти замкнутую ломанную, не
имеющую самопересечений, с наименьшим числом звеньев, которая
«огибает» все введенные точки (то есть все точки будут либо
являться вершинами ломанной, либо будут лежать внутри нее).
13. Вводятся характеристики
n
окружностей: (
х
1
,
y
1
,
r
1
); (
х
2
,
y
2
,
r
2
); …;
(
х
n
,
y
n
,
r
n
), где (
х
i
,
y
i
)
−
координаты центра i-й окружности,
r
i
−
радиус
i-й окружности. Найти среди этих окружностей все уединенные
окружности, т. е. такие которые не имеют общих точек пересечения
ни с одной из остальных окружностей, не лежат целиком внутри и не
заключают внутри себя какую-либо из остальных окружностей.
14. Вводятся характеристики
n
окружностей. Найти среди этих окруж-
ностей такую, которая содержит целиком внутри себя наибольшее
количество окружностей, но сама не пересекается ни с одной окруж-
ностью.
15. Вводятся характеристики
n
окружностей. Найти самую большую
совокупность вложенных друг в друга окружностей, причем ни одна
из этих окружностей не должна иметь точек пересечения с какой
−
либо окружностью.
16. Вводятся характеристики
n
окружностей. Найти самую большую
совокупность сцепленных окружностей, т. е. систему, в которой
каждая окружность имеет общие точки пересечения со всеми осталь-
ными окружностями системы.
17. Вводятся характеристики
n
окружностей. Найти минимальную
окружность, такую, что внутри нее лежали бы все исходные
n
окружностей.
18. Вводятся характеристики
n
треугольников: {(
х
11
,
y
11
), (
х
21
,
y
21
),
(
х
31
,
y
31
)}; {(
х
12
,
y
12
), (
х
22
,
y
22
), (
х
32
,
y
32
)}; …; {(
х
1n
,
y
1n
), (
х
2n
,
y
2n
),
(
х
3n
,
y
3n
)}; где {(
х
1i
,
y
1i
), (
х
2i
,
y
2i
), (
х
3i
,
y
3i
)}
−
координаты вершин i-го
треугольника. Найти среди этих треугольников все уединенные
треугольники, т. е. такие, которые не имеют общих точек пересече-
73
ния ни с одним из остальных треугольников, не лежат целиком
внутри и не заключают внутри себя какой-либо из остальных
треугольников.
19. Вводятся характеристики
n
треугольников. Найти среди этих треу-
гольников такой, который содержит целиком внутри себя наиболь-
шее количество треугольников, но сам не пересекается ни с одним
треугольником.
20. Вводятся характеристики
n
треугольников. Найти самую большую
совокупность вложенных друг в друга треугольников, причем ни
один из этих треугольников не должен иметь точек пересечения с
каким
−
либо треугольником.
21. Вводятся характеристики
n
треугольников. Найти самую большую
совокупность сцепленных треугольников, т. е. систему, в которой
каждый треугольник имеет общие точки пересечения со всеми
остальными треугольниками системы.
22. Вводятся характеристики
n
четырехугольников: {(
х
11
,
y
11
), (
х
21
,
y
21
),
(
х
31
,
y
31
), (
х
41
,
y
41
)}; {(
х
12
,
y
12
), (
х
22
,
y
22
), (
х
32
,
y
32
), (
х
42
,
y
42
)}; …;
{(
х
1n
,
y
1n
), (
х
2n
,
y
2n
), (
х
3n
,
y
3n
), (
х
4n
,
y
4n
)}, где {(
х
1i
,
y
1i
), (
х
2i
,
y
2i
), (
х
3i
,
y
3i
),
(
х
4i
,
y
4i
)}
−
координаты вершин
i
-го четырехугольника. Найти среди
этих четырехугольников все уединенные четырехугольники, т. е.
такие, которые не имеют общих точек пересечения ни с одним из
остальных четырехугольников, не лежат целиком внутри и не
заключают внутри себя какой-либо из остальных четырехугольников.
23. Вводятся характеристики n четырехугольников. Найти среди этих
четырехугольников такой, который содержит целиком внутри себя
наибольшее количество четырехугольников, но сам не пересекается
ни с одним четырехугольником.
24. Вводятся характеристики n четырехугольников. Найти самую боль-
шую совокупность вложенных друг в друга четырехугольников, при-
чем ни один из этих четырехугольников не должен иметь точек
пересечения с каким-либо четырехугольником.
25. Вводятся характеристики к произвольных многоугольников:
(
х
1
1
,
y
1
1
), (
х
2
1
,
y
2
1
), …, (
х
α
1
,
y
α
1
)
−
F
1
;
(
х
1
2
,
y
1
2
), (
х
2
2
,
y
2
2
), …, (
х
β
2
,
y
β
2
)
−
F
2
;
…
(
х
1
k
,
y
1
k
), (
х
2
k
,
y
2
k
), …, (
х
ω
k
,
y
ω
k
)
−
F
k
.
Найти все уединенные многоугольники среди введенных (см. поясне-
ния к предыдущим заданиям).
74
Контрольные вопросы
1. Предикат отрицания.
2. Структура, объекты структуры.
3. Функтор структуры, его характеристика.
4. Представление структуры.
5. Сопоставимость структур.
6. Предикаты для работы с окнами.
7. Предикаты генерации звука.
8. Написать процедуру, которая определяет:
1) является ли заданный отрезок вертикальным или горизонтальным;
2) лежит ли заданный отрезок на прямой
у
= 10;
9. Написать процедуру, которая:
1) создает окно;
2) выводит текст в окно;
3) удаляет окно;
4) создаёт перекрывающиеся окна;
5) создает меню при помощи окна;
6) генерирует два звуковых сигнала.
75
Лабораторная работа 4
Списки
Цель и содержание работы
Целью работы является приобретение навыков в использовании сред-
ств языка
Турбо-Пролога
для работы со списками. Разработать
программу в соответствии с индивидуальным заданием. Элементы
списка вводятся с клавиатуры. В программу должны быть использованы
окна, меню. Вариант индивидуального задания выбирается в
соответствии с номером по журналу.
В работе должны быть использованы окна, меню.
Индивидуальные задания
Вводится список, элементами которого являются числа. Осуществить
следующие операции:
1) выделение
к-
го элемента с начала списка;
2) выделение
к
-го элемента с конца списка;
3) выделение
к
элементов с начала списка;
4) выделение
к
элементов с конца списка;
5) выделение
к
элементов, начиная с
l-
го с начала списка;
6) выделение
к
элементов, заканчивая
l-
м с конца списка;
7) перестановка
к
-го элемента в начало списка;
8) перестановка
к-
го элемента с начала списка в конец списка;
9) перестановка
к-
го элемента с конца списка в начало списка;
10) перестановка
к-
го элемента с конца списка в конец списка;
11) перестановка
к-
го и
l-
го элементов списка;
12) перестановка
к
элементов с начала списка в конец списка;
13) перестановка
к
элементов с конца списка в начало списка;
14) перестановка
к
элементов, начиная с
l-
го с начала списка в начало
списка;
15) перестановка
к
элементов, начиная с
l-
го с начала списка в конец
списка;
16) перестановка
к
элементов, заканчивая
l-
м с конца списка в начало
списка;
17) перестановка
к
элементов, заканчивая
l-
м с конца списка в конец
списка;
18) копирование
к-
го элемента с начала списка в начало списка;
19) копирование
к-
го элемента с начала списка в конец списка;
20) копирование
к-
го элемента с конца списка в начало списка;
21) копирование
к-
го элемента с конца списка в конец списка;
76
22) копирование
к
элементов с начала списка в начало списка;
23) копирование
к
элементов с начала списка в конец списка;
24) копирование
к
элементов с конца списка в начало списка;
25) копирование
к
элементов с конца списка в конец списка;
26) копирование
к
элементов, начиная с
l-
го с начала списка в начало
списка;
27) копирование
к
элементов, начиная с
l-
го с начала списка в конец
списка.
28) копирование
к
элементов, заканчивая
l-
м с конца списка в начало
списка;
29) копирование
к
элементов, заканчивая
l-
м с конца списка в конец
списка;
30) удаление
к-
го элемента с начала списка;
31) удаление
к-
го элемента с конца списка;
32) удаление
к
элементов с начала списка;
33) удаление
к
элементов с конца списка;
34) удаление
к
элементов, начиная с
l-
го с начала списка;
35) удаление
к
элементов, заканчивая
l-
м с конца списка;
36) удаление из списка первого элемента, удовлетворяющего ключу;
37) удаление из списка последнего элемента, удовлетворяющего
ключу;
38) удаление из списка всех элементов, удовлетворяющих ключу;
39) добавление элемента перед
к
-м элементом с начала списка;
40) добавление элемента после
к−
ого элемента с начала списка;
41) добавление элемента перед
к-
м элементом с конца списка;
42) добавление элемента после
к
-го элемента с конца списка;
43) добавление элемента в начало списка;
44) добавление элемента в конец списка;
45) поиск в списке первого элемента, удовлетворяющего ключу;
46) поиск в списке последнего элемента, удовлетворяющего ключу;
47) поиск в списке всех элементов, удовлетворяющих ключу;
48) замена
к-
го элемента с начала списка на введенный элемент;
49) замена
к-
го элемента с конца списка на введенный элемент;
50) замена
к
первых элементов списка на один и тот же введенный
элемент;
51) замена
к
последних элементов списка на один и тот же введенный
элемент.
52) замена
к
элементов, начиная с
l-
го с начала списка на один и тот же
введенный элемент;
53) замена
к
элементов, заканчивая
l-
м с конца списка на один и тот же
введенный элемент;
77
54) замена первого элемента, удовлетворяющего ключу на введенный
элемент;
55) замена последнего элемента, удовлетворяющего ключу на введен-
ный элемент;
56) замена всех элементов, удовлетворяющих ключу на один и тот же
введенный элемент;
57) инверсия списка;
58) инверсия
к
первых элементов списка;
59) инверсия
к
последних элементов списка;
60) инверсия
к
элементов, начиная с
l-
го с начала списка;
61) инверсия
к
элементов, заканчивая
l-
м с конца списка;
62) сортировка списка по возрастанию;
63) сортировка списка по убыванию;
64) сортировка
к
элементов с начала списка по возрастанию;
65) сортировка
к
элементов с начала списка по убыванию;
66) сортировка
к
элементов с конца списка по возрастанию;
67) сортировка
к
элементов с конца списка по убыванию;
68) сдвиг влево на
к
элементов с занесением в освободившиеся места
одного и того же введенного элемента;
69) сдвиг вправо на
к
элементов с занесением в освободившиеся места
одного и того же введенного элемента;
70) циклический сдвиг влево на
к
элементов;
71) циклический сдвиг вправо на
к
элементов;
72) присоединение списка к списку;
73) преобразование списка во множество;
74) объединение двух списков;
75) пересечение двух списков;
76) разность двух списков.
Контрольные вопросы
1. Понятие списка
,
объекты списка.
2. Операции над списками.
3. Метод разделения списка на голову и хвост.
4. Компоновка данных в список.
5. Написать процедуру, которая выполняет:
1) печать элементов списка;
2) поиск элементов в списке;
3) добавление элемента в конец списка;
4) суммирование элементов списка;
5) деление списка на отрицательные, положительные и нулевые числа;
6) вычисление длины списка.
78
Лабораторная работа 5
Деревья
Цель и содержание работы
Целью работы является приобретение навыков в использовании
средств языка
Турбо-Пролога
для работы с деревьями. В работе должны
быть использованы окна, меню, подменю.
Индивидуальные задания
Вводятся элементы, которые организуются в бинарное
упорядоченное дерево. Осуществить следующие операции:
1) определение высоты дерева;
2) определение количества вакансий в дереве (определение числа эле-
ментов, добавление которых сделает дерево полностью бинарным);
3) определение абсолютного количества вакансий в дереве (опреде-
ление числа элементов, добавление которых сделает дерево идеаль-
но сбалансированным);
4) определение степени несбалансированности дерева (насколько
высота левого поддерева отличается от высоты правого поддерева);
5) определение степени несимметричности дерева (определение мини-
мального числа элементов, добавление которых сделает дерево
симметричным);
6) определение самой длинной «
прямой ветви
» в дереве (по
принципу:
left
/
left
/
left
/
… …
/
left
или
right
/
right
/
right
/
…
…
/
right
);
7) определение преобладания ветвей в дереве (по принципу:
left
/
right
);
8) удаление последнего уровня в дереве;
9) удаление последнего уровня из обоих поддеревьев;
10) удаление
к
последних уровней в дереве;
11) удаление
к
последних уровней из обоих поддеревьев;
12) удаление всего левого поддерева;
13) удаление всего правого поддерева.
14) удаление до
к
уровней;
15) удаление элемента по ключу;
16) удаление всех элементов, меньших ключа;
17) удаление всех элементов, больших ключа;
18) удаление корня дерева;
19) добавление элемента в корень дерева;
79
20) добавление элемента в качестве листа;
21) замена элемента в дереве;
22) удаление из дерева таких элементов, чтобы оно стало симметрич-
ным (причем должно быть удалено минимальное число элементов);
23) выполнение операции объединения 2-х деревьев;
24) выполнение операции пересечения 2-х деревьев;
25) выполнение операции относительно дополнения 2-х деревьев;
26) преобразование заданного дерева в список;
27) вывод на печать всех элементов дерева, которые больше заданного
числа
C
;
28) определение пути между корнем дерева и указанным элементом.
Контрольные вопросы
1. Бинарное упорядоченное дерево (определение, описание на
Турбо-
Прологе
).
2. Операции над деревьями.
3. Процедурный смысл поиска в дереве.
4. Создание дерева.
5. Написать процедуру, которая определяет:
1) является ли заданное бинарное дерево упорядоченным;
2) количество элементов дерева;
3) печать элементов дерева;
4) максимальный элемент дерева;
5) глубину дерева;
6) минимальный элемент дерева.
80
Лабораторная работа 6
Базы данных. Файлы
Цель и содержание работы
Целью работы является приобретение навыков в использовании
средств языка
Турбо-Пролог
для работы с базами данных и последо-
вательными файлами.
Разработать программу в соответствии с индивидуальным заданием. В
программе должны быть использованы окна, меню, подменю. Вариант
индивидуального задания выбирается в соответствии с номером по
журналу.
Индивидуальные задания
Для предметной области из лабораторной работы 1 осуществить
следующее:
1) преобразование статической базы данных в динамическую;
2) возможность добавления записей в базу данных;
3) возможность удаления записей из базы данных;
4) возможность коррекции записей в базе данных;
5) поиск минимального и максимального значения по некоторому полю;
6) поиск в базе данных по заданному ключу;
7) сортировка данных по возрастанию (убыванию).
Контрольные вопросы
1. Статическая и динамическая базы данных, определения, описания
предикатов.
2. Предикаты для работы с утверждениями динамической базы данных.
3. Описание файлового домена в Турбо-Прологе.
4. Встроенные предикаты, осуществляющие запись в файл.
5. Встроенные предикаты, осуществляющие чтение из файла.
6. Модификация существующего файла.
7. Написать процедуру, которая:
1) создает динамическую базу данных;
2) осуществляет поиск в базе данных;
3) осуществляет удаление заданного утверждения из базы данных;
4) создает новый файл, предварительно проверив его отсутствие на МД;
5) читает из файла объекты, относящиеся к определенному в про-
грамме домену;
6) добавляет в последовательный файл одну запись.