Пусть T - некоторый тип. Рассмотрим (отсутствующий
в T ".
Его значениями являются последовательности значений
типа T.
Операции:
var s: T )t:T ; var s: T )var t:T ; var s: T )s: T ): boolean s: T ): T(Мы пользуемся обозначениями, напоминающими s пустым.
Процедура "Добавить" добавляет t в конец
последовательности s. Процедура "Взять"
применима, если последовательность s непуста; она
забирает из нее последний элемент, который становится
t. Выражение "Пуст( s )"
истинно, если последовательность s пуста. Выражение
"Вершина( s )" определено, если
последовательность s непуста, и равно последнему
элементу последовательности s.
Мы покажем, как моделировать
Будем считать, что количество элементов в стеке не
превосходит некоторого числа n. Тогда
Содержание: array [1..n] of T; Длина: integer;
считая, что в стеке находятся элементы
Содержание [1],...,Содержание [Длина].
Длина := 0
t:{Длина < n}
Длина := Длина+1;
Содержание [Длина] :=t;
t:{Длина > 0}
t := Содержание [Длина];
Длина := Длина - 1;
Длина = 0.Содержание [Длина].Таким образом, вместо переменной типа Содержание
и Длина. Можно также определить тип , записав
const N = ... type stack = record | Содержание: array [1..N] of T; | Длина: integer; end;
(Мы позволяем себе использовать имена переменных из русских
букв, хотя обычно
procedure Добавить (t: T; var s: stack);
begin
| {s.Длина < N}
| s.Длина := s.Длина + 1;
| s.Содержание [s.Длина] := t;
end;
Будем рассматривать последовательности открывающихся
и закрывающихся круглых и квадратных скобок ( ) [ ].
Среди всех таких последовательностей выделим
правильные - те, которые могут быть получены по таким
правилам:
A и B правильны, то и AB
правильна.A правильна, то [ A ]
и ( A )
правильны.Пример. Последовательности (), $${[[}\,{]]}$$, $${[()[}\,{]()][}\,{]}$$ правильны,
а последовательности ], )(, (], ([)] - нет.
6.1.1.
Проверить правильность последовательности за время, не
превосходящее
Решение. Пусть $${a[1]}\ldots{a[n]}$$ - проверяемая последовательность. Разрешим хранить в стеке открывающиеся круглые и квадратные скобки (т. е. 1 и 2).
Вначале
Сделать_пустым (s);
i := 0; Обнаружена_ошибка := false;
{прочитано i символов последовательности}
while (i < n) and not Обнаружена_ошибка do begin
| i := i + 1;
| if (a[i] = 1) or (a[i] = 2) then begin
| | Добавить (a[i], s);
| end else begin {a[i] равно -1 или -2}
| | if Пуст (s) then begin
| | | Обнаружена_ошибка := true;
| | end else begin
| | | Взять (t, s);
| | | Обнаружена_ошибка := (t <> - a[i]);
| | end;
| end;
end;
Правильно := (not Обнаружена_ошибка) and Пуст (s);
Убедимся в
(1) Если последовательность построена по правилам, то
программа даст ответ "да". Это легко доказать
AB
в предположении, что для A и B уже проверено, и,
наконец, для последовательностей [A]
и (A) - в предположении, что для A уже
проверено. Для пустой очевидно. Для AB действия программы
происходят как для A и кончаются с пустым B. Для [A] сначала
помещается в A - с той разницей, что в глубине A (A).
(2) Покажем, что если программа завершает работу с ответом
"да", то последовательность правильна. Рассуждаем
(A) или [A], а работа программы (кроме первого
и последнего шагов) отличается от ее работы на A лишь
наличием лишней скобки на дне
6.1.2. Как упростится программа, если известно, что в последовательности могут быть только круглые скобки?
Решение. В этом случае от
6.1.3.
Реализовать с помощью одного массива два
Решение.
6.1.4.
Реализовать k T, общее
количество элементов в которых не превосходит n,
с использованием массивов суммарной длины $$C
({n}+{k})$$, затрачивая на каждое действие со
Решение. Применяемый метод называется "ссылочной реализацией". Он использует три массива:
Содержание: array [1..n] of T; Следующий: array [1..n] of 0..n; Вершина: array [1..k] of 0..n.
Удобно изображать Содержание как n ячеек
с номерами $${1}\ldots{n}$$, каждая из которых содержит
элемент типа T. Следующий изобразим в виде
стрелок, проведя стрелку из i в j, если Следующий[i]=j. (Если Следующий[i]=0, стрелок
из i не проводим.) Содержимое s -го Содержание[Вершина[s]], остальные элементы s -го
Стрелочные траектории, выходящие из$${Вершина[1]},\ldots, {Вершина[k]}$$
(из тех, которые не равны 0 ) не должны пересекаться.
Помимо них, нам понадобится еще одна стрелочная траектория,
содержащая все неиспользуемые в данный момент Свободная
(
p, t, q, a ( a -
вершина); 2-ой содержит s, v ( v - вершина).
procedure Начать_работу; {Делает все стеки пустыми}
| var i: integer;
begin
| for i := 1 to k do begin
| | Вершина [i]:=0;
| end;
| for i := 1 to n-1 do begin
| | Следующий [i] := i+1;
| end;
| Следующий [n] := 0;
| Свободная:=1;
end;
function Есть_место: boolean; begin | Есть_место := (Свободная <> 0); end;
procedure Добавить (t: T; s: integer);
| {Добавить t к s-му стеку}
| var i: 1..n;
begin
| {Есть_место}
| i := Свободная;
| Свободная := Следующий [i];
| Следующий [i] := Вершина [s];
| Вершина [s] :=i;
| Содержание [i] := t;
end;
function Пуст (s: integer): boolean;
| {s-ый стек пуст}
begin
| Пуст := (Вершина [s] = 0);
end;
procedure Взять (var t: T; s: integer);
| {взять из s-го стека в t}
| var i: 1..n;
begin
| {not Пуст (s)}
| i := Вершина [s];
| t := Содержание [i];
| Вершина [s] := Следующий [i];
| Следующий [i] := Свободная;
| Свободная := i;
end;
function Вершина_стека (s: integer): T;
| {вершина s-го стека}
begin
| Вершина_стека := Содержание[Вершина[s]];
end;
Значениями типа "очередь элементов типа T ",
как и для T. Разница состоит в том, что берутся элементы не
с конца, а с начала (а добавляются по-прежнему в конец).
Операции с очередями:
var x: очередь элементов типа T );t:T, var x: очередь элементов типа T );var t:T, var x: очередь элементов типа T );x: очередь элементов типа T ): boolean ;x: очередь элементов типа T ): T.При выполнении команды "Добавить" указанный элемент
добавляется в конец очереди. Команда "Взять"
выполнима, лишь если очередь непуста, и забирает из нее
первый (положенный туда раньше всех) элемент, помещая его
в t.
Английские названия Last In First Out (последним вошел - первым вышел), а очередей - First In First Out (первым вошел - первым
вышел). Сокращения: , .
6.2.1.
Реализовать операции с очередью ограниченной длины так,
чтобы количество действий для каждой операции было
ограничено
Решение. Будем хранить элементы очереди в соседних
элементах массива. Тогда очередь будет прирастать справа
и убывать слева. Поскольку при этом она может дойти до
края, свернем
Введем
Содержание: array [0..n-1] of T
и переменные
Первый: 0..n-1, Длина : 0..n.
При этом элементами очереди будут$$\begin{multiline*}
{Содержание [Первый]}, {Содержание [Первый+1]}, \ldots,\\
%
{Содержание [Первый+Длина-1]},
\end{multiline*}$$
где n. (Предупреждение.
Если вместо этого ввести переменные Первый
и Последний, значения которых - n,
то пустая очередь может быть спутана с очередью
из n элементов.)
Операции выполняются так.
Сделать пустой:
Длина := 0; Первый := 0;
Добавить элемент:
{Длина < n}
Содержание [(Первый + Длина) mod n] := элемент;
Длина := Длина + 1;
Взять элемент:
{Длина > 0}
элемент := Содержание [Первый];
Первый := (Первый + 1) mod n;
Длина := Длина - 1;
Пуста:
Длина = 0
Очередной:
Содержание [Первый]
6.2.2.
(Сообщил А.Г. Кушниренко) Придумать способ моделирования
очереди с помощью двух T ). При этом отработка n операций
с очередью (начатых, когда очередь была пуста) должна
требовать порядка n действий.
Решение.
6.2.3.
6.2.4.
(Сообщил А.Г. Кушниренко.) Имеется T и конечное число переменных типа T и целого
типа. В начальном состоянии в
Указание.
(1) Элементы n выполнить циклический сдвиг на n дважды,
подсунув разные элементы, и посмотреть, появятся ли разные
элементы через n шагов.
6.2.5.
Напечатать в порядке возрастания первые n натуральных
чисел, в разложение которых на простые множители входят
только числа 2, 3, 5.
Решение. Введем три очереди x2, x3, x5,
в которых будем хранить элементы, которые в 2 ( 3, 5 )
раз больше напечатанных, но еще не напечатаны. Определим
процедуру
procedure напечатать_и_добавить (t: integer); begin | writeln (t); | Добавить (2*t, x2); | Добавить (3*t, x3); | Добавить (5*t, x5); end;
Вот схема программы:
...сделать x2, x3, x5 пустыми
напечатать_и_добавить (1);
k := 1; { k - число напечатанных }
{инвариант: напечатано в порядке возрастания k минимальных
членов нужного множества; в очередях элементы, вдвое,
втрое и впятеро большие напечатанных, но не напечатанные,
расположенные в возрастающем порядке}
while k <> n do begin
| x := min (очередной(x2), очередной(x3), очередной(x5));
| напечатать_и_добавить (x);
| k := k+1;
| ...взять x из тех очередей, где он был очередным;
end;
Пусть x. Тогда
он делится нацело на одно из чисел 2, 3, 5, и частное
также принадлежит множеству. Значит, оно напечатано.
Значит, x находится в одной из очередей и,
следовательно, является в ней первым (меньшие напечатаны,
а элементы очередей не напечатаны). Напечатав x, мы должны
его изъять и добавить его кратные.
Длины очередей не превосходят числа напечатанных элементов.
Следующая задача связана с графами (к которым мы вернемся в лекции 9).
Пусть задано конечное множество, элементы которого называют началом p и концом q ; говорят также,
что оно выходит из p и входит
в q.
Обычно
6.2.6.
Известно, что
Решение.
Вначале змея состоит из единственной вершины. Далее мы следуем такому правилу:
while змея включает не все ребра do begin
| if из головы выходит не входящее в змею ребро then begin
| | удлинить змею этим ребром
| end else begin
| | {голова змеи в той же вершине, что и хвост}
| | отрезать конец хвоста и добавить его к голове
| | {"змея откусывает конец хвоста"}
| end;
end;
Докажем, что мы достигнем цели.
(1) Идя по змее от хвоста к голове, мы входим в каждую вершину столько же раз, сколько выходим. Так как в любую вершину входит столько же ребер, сколько выходит, то невозможность выйти означает, что голова змеи в той же точке, что и хвост.
(2) Змея не укорачивается, поэтому либо она охватит все
Замечание по реализации на i
будем хранить число Out[i] выходящих из нее ребер,
а также номера Num[i][1],..., Num[i][Out[i]] тех
вершин, куда эти
6.2.7.
Доказать, что для всякого n существует последовательность
нулей и единиц длины $$2^n$$ со следующим свойством: если
"свернуть ее в кольцо" и рассмотреть все фрагменты
длины n (их число равно $$2^n$$ ), то мы получим все
возможные последовательности нулей и единиц длины n.
Построить алгоритм отыскания такой последовательности,
требующий не более $$C^n$$ действий для некоторой
C.
Указание.
Рассмотрим x ведет y,
если x может быть началом, а y - концом некоторой
последовательности длины n. Тогда из каждой вершины
входит и выходит два
6.2.8.
Реализовать k очередей с ограниченной суммарной
длиной n, используя память $$O(n+k)$$ [= не более $$C(n+k)$$
для некоторой C ], причем каждая операция (кроме
начальной, делающей все очереди пустыми) должна требовать
ограниченного
Решение. Действуем аналогично 0 ). Кроме
того, мы должны для каждой очереди знать последнего (если
он есть) - иначе не удастся добавлять. Как и для
Содержание: array [1..n] of T; Следующий: array [1..n] of 0..n; Первый: array [1..k] of 0..n; Последний: array [1..k] of 0..n; Свободная : 0..n;
procedure Сделать_пустым; | var i: integer; begin | for i := 1 to n-1 do begin | | Следующий [i] := i + 1; | end; | Следующий [n] := 0; | Свободная := 1; | for i := 1 to k do begin | | Первый [i]:=0; | end; end;
function Есть_место : boolean; begin | Есть_место := Свободная <> 0; end;
function Пуста (номер_очереди: integer): boolean; begin | Пуста := Первый [номер_очереди] = 0; end;
procedure Взять (var t: T; номер_очереди: integer);
| var перв: integer;
begin
| {not Пуста (номер_очереди)}
| перв := Первый [номер_очереди];
| t := Содержание [перв]
| Первый [номер_очереди] := Следующий [перв];
| Следующий [перв] := Свободная;
| Свободная := перв;
end;
procedure Добавить (t: T; номер_очереди: integer);
| var нов, посл: 1..n;
begin
| {Есть_место }
| нов := Свободная; Свободная := Следующий [Свободная];
| {из списка свободного места изъят номер нов}
| if Пуста (номер_очереди) then begin
| | Первый [номер_очереди] := нов;
| | Последний [номер_очереди] := нов;
| | Следующий [нов] := 0;
| | Содержание [нов] := t;
| end else begin
| | посл := Последний [номер_очереди];
| | {Следующий [посл] = 0 }
| | Следующий [посл] := нов;
| | Следующий [нов] := 0;
| | Содержание [нов] := t
| | Последний [номер_очереди] := нов;
| end;
end;
function Очередной (номер_очереди: integer): T; begin | Очередной := Содержание [Первый [номер_очереди]]; end;
6.2.9.
Та же задача для
Указание.
В следующей задаче
6.2.10.
На n точек, пронумерованных слева
направо (а при равных
Решение. Будем присоединять точки к
Будем хранить вершины многоугольника в
while по дороге из хвоста в подподхвост мы поворачиваем
| у подхвоста влево ("впуклость") do begin
| выкинуть подхвост из дека
end
Таким же способом устраняется впуклость у головы
Замечание. Действия с подхвостом и подподхвостом не входят
в определение
Еще одно замечание. Есть два вырожденных случая: если мы
вообще не поворачиваем у подхвоста (т.е. три соседние
вершины лежат на одной прямой) и если мы поворачиваем
на $$180^{\circ}$$ (так бывает, если наш многоугольник есть
двуугольник). В первом случае подхвост стоит удалить (чтобы
в
Пусть T - некоторый тип. Существует много способов
хранить (конечные) множества элементов типа T ; выбор
между ними определяется типом T и набором требуемых
операций.
6.3.1.
Используя память $$O(n)$$
[=пропорциональную n ], хранить
| Операции | Число действий |
|---|---|
| Сделать пустым | Cn |
| Проверить принадлежность | C |
| Добавить | C |
| Удалить | C |
| Минимальный элемент | Cn |
| Проверка пустоты | Cn |
Решение. Храним множество как .
6.3.2.
То же, но проверка пустоты должна выполняться за время C.
Решение. Храним дополнительно количество элементов.
6.3.3. То же при следующих ограничениях на число действий:
| Операции | Число действий |
|---|---|
| Сделать пустым | Cn |
| Проверить принадлежность | C |
| Добавить | C |
| Удалить | Cn |
| Минимальный элемент | C |
| Проверка пустоты | C |
Решение. Дополнительно храним минимальный элемент множества.
6.3.4. То же при следующих ограничениях на число действий:
| Операции | Число действий |
|---|---|
| Сделать пустым | Cn |
| Проверить принадлежность | C |
| Добавить | Cn |
| Удалить | C |
| Минимальный элемент | C |
| Проверка пустоты | C |
Решение. Храним минимальный, а для каждого - следующий и предыдущий по величине.
В следующих задачах величина n.
6.3.5. Память $$Cn$$.
| Операции | Число действий |
|---|---|
| Сделать пустым | C |
| Число элементов | C |
| Проверить принадлежность | Cn |
| Добавить новый (заведомо отсутствующий) | C |
| Удалить | Cn |
| Минимальный элемент | Cn |
| Взять какой-то элемент | C |
Решение. Множество представляем с помощью переменных
a:array [1..n] of integer, k: 0..n;
множество содержит k элементов $${a[1]},\ldots{a[k]}$$ ; все они различны. По существу мы
храним
6.3.6. Память $$Cn$$.
| Операции | Число действий |
|---|---|
| Сделать пустым | C |
| Проверить пустоту | C |
| Проверить принадлежность | C logn |
| Добавить | Cn |
| Удалить | Cn |
| Минимальный элемент | C |
Решение. См. решение предыдущей задачи с дополнительным условием $${a[1]}\ldots{a[k]}$$. При проверке принадлежности используем двоичный поиск.
В следующей задаче полезно комбинировать разные способы.
6.3.7.
Используя описанные способы представления множеств, найти
все вершины
Решение. (Другое решение смотри в лекции о num[i] - число ребер, выходящих из i,
а $${out[i][1]},\ldots\ldots, {out[i][num[i]]}$$ - вершины,
куда
ведут i.
procedure Доступные (i: integer);
| {напечатать все вершины, доступные из i, включая i}
| var X: подмножество 1..n;
| P: подмножество 1..n;
| q, v, w: 1..n;
| k: integer;
begin
| ...сделать X, P пустыми;
| writeln (i);
| ...добавить i к X, P;
| {(1) P = множество напечатанных вершин; P содержит i;
| (2) напечатаны только доступные из i вершины;
| (3) X - подмножество P;
| (4) все напечатанные вершины, из которых выходит
| ребро в ненапечатанную вершину, принадлежат X}
| while X непусто do begin
| | ...взять какой-нибудь элемент X в v;
| | for k := 1 to num [v] do begin
| | | w := out [v][k];
| | | if w не принадлежит P then begin
| | | | writeln (w);
| | | | добавить w в P;
| | | | добавить w в X;
| | | end;
| | end;
| end;
end;
Свойство (1) не нарушается, так как P. Свойство (2): раз v было в X, то v доступно, поэтому w доступно.
Свойство (3) очевидно. Свойство (4): мы удалили из X
элемент v, но все вершины, куда из v идут
6.3.8.
Показать, что можно использовать и другой P - напечатанные вершины; $$X \subset P$$ ;
осталось напечатать вершины, доступные из X по ненапечатанным вершинам.
Оценка времени работы. Заметим, что изъятые из X
элементы больше туда не добавляются, так как они в момент
изъятия (и, следовательно, всегда позже) принадлежат P,
а добавляются только элементы не из P. Поэтому тело
цикла while для каждой доступной вершины выполняется не
более, чем по разу, при этом for выполняется
столько раз, сколько из вершины выходит ребер.
Для X надо использовать представление со P - булевский
6.3.9. Решить предыдущую задачу, если требуется, чтобы доступные вершины печатались в таком порядке: сначала заданная вершина, потом ее соседи, потом соседи соседей (еще не напечатанные) и т.д.
Указание.
Так получится, если использовать очередь для хранения X
в приведенном выше решении: докажите k, что
существует момент, в который напечатаны все вершины на
k, а в очереди находятся все
вершины, удаленные ровно на k.
Более сложные способы представления множеств будут разобраны в лекциях 13 (хеширование) и 14 (деревья).
6.4.1.
Реализовать n, а именно
i -ю x ;i -ой а также операцию
(точнее, одного из минимальных элементов). Количество
действий для всех операций должно быть не более $$\text {C log n}$$, не считая
операции "начать работу" (которая
требует не более Cn действий).
Решение. Используется прием, изложенный в разделе о сортировке деревом. Именно, надстроим над элементами массива как над листьями двоичное дерево, в каждой вершине которого храним минимум элементов соответствующего поддерева. Корректировка этой информации, а также прослеживание пути из корня к минимальному элементу требуют логарифмического числа действий.
6.4.2. Приоритетная очередь - это очередь, в которой важно не то, кто встал последним (порядок помещения в нее не играет роли), а кто главнее. Более точно, при помещении в очередь указывается приоритет помещаемого объекта (будем считать приоритеты целыми числами), а при взятии из очереди выбирается элемент с наибольшим приоритетом (или один из таких элементов). Реализовать приоритетную очередь так, чтобы помещение и взятие элемента требовали логарифмического числа действий (от размера очереди).
Решение. Следуя алгоритму сортировки деревом
(в его окончательном варианте), будем размещать элементы
очереди в массиве x[1..k], поддерживая такое свойство: x[i] старше (имеет больший приоритет) своих сыновей x[2i] и x[2i+1], если таковые существуют - и,
следовательно, всякий элемент старше своих потомков.
(Сведения о приоритетах также хранятся в массиве, так что
мы имеем дело с массивом пар $$\langle$$ элемент,
приоритет $$\rangle$$.) Удаление элемента с сохранением
этого свойства описано в алгоритме сортировки. Надо еще
уметь восстанавливать свойство после добавления элемента
в конец. Это делается так:
t:= номер добавленного элемента
{инвариант: в дереве любой предок приоритетнее потомка,
если этот потомок - не t}
while t - не корень и t старше своего отца do begin
| поменять t с его отцом
end;
Если очередь образуют граждане, стоящие в вершинах дерева, т.е. за каждым стоит двое, а перед каждым (кроме первого) - один, то смысл этого алгоритма ясен: встав в конец, приоритетный гражданин начинает пробираться к началу, вытесняя впереди стоящих - пока не встретит более приоритетного.
Замечание. Приоритетную очередь естественно использовать при моделировании протекающих во времени процессов. При этом элементы очереди - это ожидаемые события, а их приоритет определяется временем, когда они произойдут.
Пусть T - некоторый тип. Рассмотрим (отсутствующий
в T ".
Его значениями являются последовательности значений
типа T.
Операции:
var s: T )t:T ; var s: T )var t:T ; var s: T )s: T ): boolean s: T ): T(Мы пользуемся обозначениями, напоминающими s пустым.
Процедура "Добавить" добавляет t в конец
последовательности s. Процедура "Взять"
применима, если последовательность s непуста; она
забирает из нее последний элемент, который становится
t. Выражение "Пуст( s )"
истинно, если последовательность s пуста. Выражение
"Вершина( s )" определено, если
последовательность s непуста, и равно последнему
элементу последовательности s.
Мы покажем, как моделировать
Будем считать, что количество элементов в стеке не
превосходит некоторого числа n. Тогда
Содержание: array [1..n] of T; Длина: integer;
считая, что в стеке находятся элементы
Содержание [1],...,Содержание [Длина].
Длина := 0
t:{Длина < n}
Длина := Длина+1;
Содержание [Длина] :=t;
t:{Длина > 0}
t := Содержание [Длина];
Длина := Длина - 1;
Длина = 0.Содержание [Длина].Таким образом, вместо переменной типа Содержание
и Длина. Можно также определить тип , записав
const N = ... type stack = record | Содержание: array [1..N] of T; | Длина: integer; end;
(Мы позволяем себе использовать имена переменных из русских
букв, хотя обычно
procedure Добавить (t: T; var s: stack);
begin
| {s.Длина < N}
| s.Длина := s.Длина + 1;
| s.Содержание [s.Длина] := t;
end;
Будем рассматривать последовательности открывающихся
и закрывающихся круглых и квадратных скобок ( ) [ ].
Среди всех таких последовательностей выделим
правильные - те, которые могут быть получены по таким
правилам:
A и B правильны, то и AB
правильна.A правильна, то [ A ]
и ( A )
правильны.Пример. Последовательности (), $${[[}\,{]]}$$, $${[()[}\,{]()][}\,{]}$$ правильны,
а последовательности ], )(, (], ([)] - нет.
6.1.1.
Проверить правильность последовательности за время, не
превосходящее
Решение. Пусть $${a[1]}\ldots{a[n]}$$ - проверяемая последовательность. Разрешим хранить в стеке открывающиеся круглые и квадратные скобки (т. е. 1 и 2).
Вначале
Сделать_пустым (s);
i := 0; Обнаружена_ошибка := false;
{прочитано i символов последовательности}
while (i < n) and not Обнаружена_ошибка do begin
| i := i + 1;
| if (a[i] = 1) or (a[i] = 2) then begin
| | Добавить (a[i], s);
| end else begin {a[i] равно -1 или -2}
| | if Пуст (s) then begin
| | | Обнаружена_ошибка := true;
| | end else begin
| | | Взять (t, s);
| | | Обнаружена_ошибка := (t <> - a[i]);
| | end;
| end;
end;
Правильно := (not Обнаружена_ошибка) and Пуст (s);
Убедимся в
(1) Если последовательность построена по правилам, то
программа даст ответ "да". Это легко доказать
AB
в предположении, что для A и B уже проверено, и,
наконец, для последовательностей [A]
и (A) - в предположении, что для A уже
проверено. Для пустой очевидно. Для AB действия программы
происходят как для A и кончаются с пустым B. Для [A] сначала
помещается в A - с той разницей, что в глубине A (A).
(2) Покажем, что если программа завершает работу с ответом
"да", то последовательность правильна. Рассуждаем
(A) или [A], а работа программы (кроме первого
и последнего шагов) отличается от ее работы на A лишь
наличием лишней скобки на дне
6.1.2. Как упростится программа, если известно, что в последовательности могут быть только круглые скобки?
Решение. В этом случае от
6.1.3.
Реализовать с помощью одного массива два
Решение.
6.1.4.
Реализовать k T, общее
количество элементов в которых не превосходит n,
с использованием массивов суммарной длины $$C
({n}+{k})$$, затрачивая на каждое действие со
Решение. Применяемый метод называется "ссылочной реализацией". Он использует три массива:
Содержание: array [1..n] of T; Следующий: array [1..n] of 0..n; Вершина: array [1..k] of 0..n.
Удобно изображать Содержание как n ячеек
с номерами $${1}\ldots{n}$$, каждая из которых содержит
элемент типа T. Следующий изобразим в виде
стрелок, проведя стрелку из i в j, если Следующий[i]=j. (Если Следующий[i]=0, стрелок
из i не проводим.) Содержимое s -го Содержание[Вершина[s]], остальные элементы s -го
Стрелочные траектории, выходящие из$${Вершина[1]},\ldots, {Вершина[k]}$$
(из тех, которые не равны 0 ) не должны пересекаться.
Помимо них, нам понадобится еще одна стрелочная траектория,
содержащая все неиспользуемые в данный момент Свободная
(
p, t, q, a ( a -
вершина); 2-ой содержит s, v ( v - вершина).
procedure Начать_работу; {Делает все стеки пустыми}
| var i: integer;
begin
| for i := 1 to k do begin
| | Вершина [i]:=0;
| end;
| for i := 1 to n-1 do begin
| | Следующий [i] := i+1;
| end;
| Следующий [n] := 0;
| Свободная:=1;
end;
function Есть_место: boolean; begin | Есть_место := (Свободная <> 0); end;
procedure Добавить (t: T; s: integer);
| {Добавить t к s-му стеку}
| var i: 1..n;
begin
| {Есть_место}
| i := Свободная;
| Свободная := Следующий [i];
| Следующий [i] := Вершина [s];
| Вершина [s] :=i;
| Содержание [i] := t;
end;
function Пуст (s: integer): boolean;
| {s-ый стек пуст}
begin
| Пуст := (Вершина [s] = 0);
end;
procedure Взять (var t: T; s: integer);
| {взять из s-го стека в t}
| var i: 1..n;
begin
| {not Пуст (s)}
| i := Вершина [s];
| t := Содержание [i];
| Вершина [s] := Следующий [i];
| Следующий [i] := Свободная;
| Свободная := i;
end;
function Вершина_стека (s: integer): T;
| {вершина s-го стека}
begin
| Вершина_стека := Содержание[Вершина[s]];
end;
Значениями типа "очередь элементов типа T ",
как и для T. Разница состоит в том, что берутся элементы не
с конца, а с начала (а добавляются по-прежнему в конец).
Операции с очередями:
var x: очередь элементов типа T );t:T, var x: очередь элементов типа T );var t:T, var x: очередь элементов типа T );x: очередь элементов типа T ): boolean ;x: очередь элементов типа T ): T.При выполнении команды "Добавить" указанный элемент
добавляется в конец очереди. Команда "Взять"
выполнима, лишь если очередь непуста, и забирает из нее
первый (положенный туда раньше всех) элемент, помещая его
в t.
Английские названия Last In First Out (последним вошел - первым вышел), а очередей - First In First Out (первым вошел - первым
вышел). Сокращения: , .
6.2.1.
Реализовать операции с очередью ограниченной длины так,
чтобы количество действий для каждой операции было
ограничено
Решение. Будем хранить элементы очереди в соседних
элементах массива. Тогда очередь будет прирастать справа
и убывать слева. Поскольку при этом она может дойти до
края, свернем
Введем
Содержание: array [0..n-1] of T
и переменные
Первый: 0..n-1, Длина : 0..n.
При этом элементами очереди будут$$\begin{multiline*}
{Содержание [Первый]}, {Содержание [Первый+1]}, \ldots,\\
%
{Содержание [Первый+Длина-1]},
\end{multiline*}$$
где n. (Предупреждение.
Если вместо этого ввести переменные Первый
и Последний, значения которых - n,
то пустая очередь может быть спутана с очередью
из n элементов.)
Операции выполняются так.
Сделать пустой:
Длина := 0; Первый := 0;
Добавить элемент:
{Длина < n}
Содержание [(Первый + Длина) mod n] := элемент;
Длина := Длина + 1;
Взять элемент:
{Длина > 0}
элемент := Содержание [Первый];
Первый := (Первый + 1) mod n;
Длина := Длина - 1;
Пуста:
Длина = 0
Очередной:
Содержание [Первый]
6.2.2.
(Сообщил А.Г. Кушниренко) Придумать способ моделирования
очереди с помощью двух T ). При этом отработка n операций
с очередью (начатых, когда очередь была пуста) должна
требовать порядка n действий.
Решение.
6.2.3.
6.2.4.
(Сообщил А.Г. Кушниренко.) Имеется T и конечное число переменных типа T и целого
типа. В начальном состоянии в
Указание.
(1) Элементы n выполнить циклический сдвиг на n дважды,
подсунув разные элементы, и посмотреть, появятся ли разные
элементы через n шагов.
6.2.5.
Напечатать в порядке возрастания первые n натуральных
чисел, в разложение которых на простые множители входят
только числа 2, 3, 5.
Решение. Введем три очереди x2, x3, x5,
в которых будем хранить элементы, которые в 2 ( 3, 5 )
раз больше напечатанных, но еще не напечатаны. Определим
процедуру
procedure напечатать_и_добавить (t: integer); begin | writeln (t); | Добавить (2*t, x2); | Добавить (3*t, x3); | Добавить (5*t, x5); end;
Вот схема программы:
...сделать x2, x3, x5 пустыми
напечатать_и_добавить (1);
k := 1; { k - число напечатанных }
{инвариант: напечатано в порядке возрастания k минимальных
членов нужного множества; в очередях элементы, вдвое,
втрое и впятеро большие напечатанных, но не напечатанные,
расположенные в возрастающем порядке}
while k <> n do begin
| x := min (очередной(x2), очередной(x3), очередной(x5));
| напечатать_и_добавить (x);
| k := k+1;
| ...взять x из тех очередей, где он был очередным;
end;
Пусть x. Тогда
он делится нацело на одно из чисел 2, 3, 5, и частное
также принадлежит множеству. Значит, оно напечатано.
Значит, x находится в одной из очередей и,
следовательно, является в ней первым (меньшие напечатаны,
а элементы очередей не напечатаны). Напечатав x, мы должны
его изъять и добавить его кратные.
Длины очередей не превосходят числа напечатанных элементов.
Следующая задача связана с графами (к которым мы вернемся в лекции 9).
Пусть задано конечное множество, элементы которого называют началом p и концом q ; говорят также,
что оно выходит из p и входит
в q.
Обычно
6.2.6.
Известно, что
Решение.
Вначале змея состоит из единственной вершины. Далее мы следуем такому правилу:
while змея включает не все ребра do begin
| if из головы выходит не входящее в змею ребро then begin
| | удлинить змею этим ребром
| end else begin
| | {голова змеи в той же вершине, что и хвост}
| | отрезать конец хвоста и добавить его к голове
| | {"змея откусывает конец хвоста"}
| end;
end;
Докажем, что мы достигнем цели.
(1) Идя по змее от хвоста к голове, мы входим в каждую вершину столько же раз, сколько выходим. Так как в любую вершину входит столько же ребер, сколько выходит, то невозможность выйти означает, что голова змеи в той же точке, что и хвост.
(2) Змея не укорачивается, поэтому либо она охватит все
Замечание по реализации на i
будем хранить число Out[i] выходящих из нее ребер,
а также номера Num[i][1],..., Num[i][Out[i]] тех
вершин, куда эти
6.2.7.
Доказать, что для всякого n существует последовательность
нулей и единиц длины $$2^n$$ со следующим свойством: если
"свернуть ее в кольцо" и рассмотреть все фрагменты
длины n (их число равно $$2^n$$ ), то мы получим все
возможные последовательности нулей и единиц длины n.
Построить алгоритм отыскания такой последовательности,
требующий не более $$C^n$$ действий для некоторой
C.
Указание.
Рассмотрим x ведет y,
если x может быть началом, а y - концом некоторой
последовательности длины n. Тогда из каждой вершины
входит и выходит два
6.2.8.
Реализовать k очередей с ограниченной суммарной
длиной n, используя память $$O(n+k)$$ [= не более $$C(n+k)$$
для некоторой C ], причем каждая операция (кроме
начальной, делающей все очереди пустыми) должна требовать
ограниченного
Решение. Действуем аналогично 0 ). Кроме
того, мы должны для каждой очереди знать последнего (если
он есть) - иначе не удастся добавлять. Как и для
Содержание: array [1..n] of T; Следующий: array [1..n] of 0..n; Первый: array [1..k] of 0..n; Последний: array [1..k] of 0..n; Свободная : 0..n;
procedure Сделать_пустым; | var i: integer; begin | for i := 1 to n-1 do begin | | Следующий [i] := i + 1; | end; | Следующий [n] := 0; | Свободная := 1; | for i := 1 to k do begin | | Первый [i]:=0; | end; end;
function Есть_место : boolean; begin | Есть_место := Свободная <> 0; end;
function Пуста (номер_очереди: integer): boolean; begin | Пуста := Первый [номер_очереди] = 0; end;
procedure Взять (var t: T; номер_очереди: integer);
| var перв: integer;
begin
| {not Пуста (номер_очереди)}
| перв := Первый [номер_очереди];
| t := Содержание [перв]
| Первый [номер_очереди] := Следующий [перв];
| Следующий [перв] := Свободная;
| Свободная := перв;
end;
procedure Добавить (t: T; номер_очереди: integer);
| var нов, посл: 1..n;
begin
| {Есть_место }
| нов := Свободная; Свободная := Следующий [Свободная];
| {из списка свободного места изъят номер нов}
| if Пуста (номер_очереди) then begin
| | Первый [номер_очереди] := нов;
| | Последний [номер_очереди] := нов;
| | Следующий [нов] := 0;
| | Содержание [нов] := t;
| end else begin
| | посл := Последний [номер_очереди];
| | {Следующий [посл] = 0 }
| | Следующий [посл] := нов;
| | Следующий [нов] := 0;
| | Содержание [нов] := t
| | Последний [номер_очереди] := нов;
| end;
end;
function Очередной (номер_очереди: integer): T; begin | Очередной := Содержание [Первый [номер_очереди]]; end;
6.2.9.
Та же задача для
Указание.
В следующей задаче
6.2.10.
На n точек, пронумерованных слева
направо (а при равных
Решение. Будем присоединять точки к
Будем хранить вершины многоугольника в
while по дороге из хвоста в подподхвост мы поворачиваем
| у подхвоста влево ("впуклость") do begin
| выкинуть подхвост из дека
end
Таким же способом устраняется впуклость у головы
Замечание. Действия с подхвостом и подподхвостом не входят
в определение
Еще одно замечание. Есть два вырожденных случая: если мы
вообще не поворачиваем у подхвоста (т.е. три соседние
вершины лежат на одной прямой) и если мы поворачиваем
на $$180^{\circ}$$ (так бывает, если наш многоугольник есть
двуугольник). В первом случае подхвост стоит удалить (чтобы
в
Пусть T - некоторый тип. Существует много способов
хранить (конечные) множества элементов типа T ; выбор
между ними определяется типом T и набором требуемых
операций.
6.3.1.
Используя память $$O(n)$$
[=пропорциональную n ], хранить
| Операции | Число действий |
|---|---|
| Сделать пустым | Cn |
| Проверить принадлежность | C |
| Добавить | C |
| Удалить | C |
| Минимальный элемент | Cn |
| Проверка пустоты | Cn |
Решение. Храним множество как .
6.3.2.
То же, но проверка пустоты должна выполняться за время C.
Решение. Храним дополнительно количество элементов.
6.3.3. То же при следующих ограничениях на число действий:
| Операции | Число действий |
|---|---|
| Сделать пустым | Cn |
| Проверить принадлежность | C |
| Добавить | C |
| Удалить | Cn |
| Минимальный элемент | C |
| Проверка пустоты | C |
Решение. Дополнительно храним минимальный элемент множества.
6.3.4. То же при следующих ограничениях на число действий:
| Операции | Число действий |
|---|---|
| Сделать пустым | Cn |
| Проверить принадлежность | C |
| Добавить | Cn |
| Удалить | C |
| Минимальный элемент | C |
| Проверка пустоты | C |
Решение. Храним минимальный, а для каждого - следующий и предыдущий по величине.
В следующих задачах величина n.
6.3.5. Память $$Cn$$.
| Операции | Число действий |
|---|---|
| Сделать пустым | C |
| Число элементов | C |
| Проверить принадлежность | Cn |
| Добавить новый (заведомо отсутствующий) | C |
| Удалить | Cn |
| Минимальный элемент | Cn |
| Взять какой-то элемент | C |
Решение. Множество представляем с помощью переменных
a:array [1..n] of integer, k: 0..n;
множество содержит k элементов $${a[1]},\ldots{a[k]}$$ ; все они различны. По существу мы
храним
6.3.6. Память $$Cn$$.
| Операции | Число действий |
|---|---|
| Сделать пустым | C |
| Проверить пустоту | C |
| Проверить принадлежность | C logn |
| Добавить | Cn |
| Удалить | Cn |
| Минимальный элемент | C |
Решение. См. решение предыдущей задачи с дополнительным условием $${a[1]}\ldots{a[k]}$$. При проверке принадлежности используем двоичный поиск.
В следующей задаче полезно комбинировать разные способы.
6.3.7.
Используя описанные способы представления множеств, найти
все вершины
Решение. (Другое решение смотри в лекции о num[i] - число ребер, выходящих из i,
а $${out[i][1]},\ldots\ldots, {out[i][num[i]]}$$ - вершины,
куда
ведут i.
procedure Доступные (i: integer);
| {напечатать все вершины, доступные из i, включая i}
| var X: подмножество 1..n;
| P: подмножество 1..n;
| q, v, w: 1..n;
| k: integer;
begin
| ...сделать X, P пустыми;
| writeln (i);
| ...добавить i к X, P;
| {(1) P = множество напечатанных вершин; P содержит i;
| (2) напечатаны только доступные из i вершины;
| (3) X - подмножество P;
| (4) все напечатанные вершины, из которых выходит
| ребро в ненапечатанную вершину, принадлежат X}
| while X непусто do begin
| | ...взять какой-нибудь элемент X в v;
| | for k := 1 to num [v] do begin
| | | w := out [v][k];
| | | if w не принадлежит P then begin
| | | | writeln (w);
| | | | добавить w в P;
| | | | добавить w в X;
| | | end;
| | end;
| end;
end;
Свойство (1) не нарушается, так как P. Свойство (2): раз v было в X, то v доступно, поэтому w доступно.
Свойство (3) очевидно. Свойство (4): мы удалили из X
элемент v, но все вершины, куда из v идут
6.3.8.
Показать, что можно использовать и другой P - напечатанные вершины; $$X \subset P$$ ;
осталось напечатать вершины, доступные из X по ненапечатанным вершинам.
Оценка времени работы. Заметим, что изъятые из X
элементы больше туда не добавляются, так как они в момент
изъятия (и, следовательно, всегда позже) принадлежат P,
а добавляются только элементы не из P. Поэтому тело
цикла while для каждой доступной вершины выполняется не
более, чем по разу, при этом for выполняется
столько раз, сколько из вершины выходит ребер.
Для X надо использовать представление со P - булевский
6.3.9. Решить предыдущую задачу, если требуется, чтобы доступные вершины печатались в таком порядке: сначала заданная вершина, потом ее соседи, потом соседи соседей (еще не напечатанные) и т.д.
Указание.
Так получится, если использовать очередь для хранения X
в приведенном выше решении: докажите k, что
существует момент, в который напечатаны все вершины на
k, а в очереди находятся все
вершины, удаленные ровно на k.
Более сложные способы представления множеств будут разобраны в лекциях 13 (хеширование) и 14 (деревья).
6.4.1.
Реализовать n, а именно
i -ю x ;i -ой а также операцию
(точнее, одного из минимальных элементов). Количество
действий для всех операций должно быть не более $$\text {C log n}$$, не считая
операции "начать работу" (которая
требует не более Cn действий).
Решение. Используется прием, изложенный в разделе о сортировке деревом. Именно, надстроим над элементами массива как над листьями двоичное дерево, в каждой вершине которого храним минимум элементов соответствующего поддерева. Корректировка этой информации, а также прослеживание пути из корня к минимальному элементу требуют логарифмического числа действий.
6.4.2. Приоритетная очередь - это очередь, в которой важно не то, кто встал последним (порядок помещения в нее не играет роли), а кто главнее. Более точно, при помещении в очередь указывается приоритет помещаемого объекта (будем считать приоритеты целыми числами), а при взятии из очереди выбирается элемент с наибольшим приоритетом (или один из таких элементов). Реализовать приоритетную очередь так, чтобы помещение и взятие элемента требовали логарифмического числа действий (от размера очереди).
Решение. Следуя алгоритму сортировки деревом
(в его окончательном варианте), будем размещать элементы
очереди в массиве x[1..k], поддерживая такое свойство: x[i] старше (имеет больший приоритет) своих сыновей x[2i] и x[2i+1], если таковые существуют - и,
следовательно, всякий элемент старше своих потомков.
(Сведения о приоритетах также хранятся в массиве, так что
мы имеем дело с массивом пар $$\langle$$ элемент,
приоритет $$\rangle$$.) Удаление элемента с сохранением
этого свойства описано в алгоритме сортировки. Надо еще
уметь восстанавливать свойство после добавления элемента
в конец. Это делается так:
t:= номер добавленного элемента
{инвариант: в дереве любой предок приоритетнее потомка,
если этот потомок - не t}
while t - не корень и t старше своего отца do begin
| поменять t с его отцом
end;
Если очередь образуют граждане, стоящие в вершинах дерева, т.е. за каждым стоит двое, а перед каждым (кроме первого) - один, то смысл этого алгоритма ясен: встав в конец, приоритетный гражданин начинает пробираться к началу, вытесняя впереди стоящих - пока не встретит более приоритетного.
Замечание. Приоритетную очередь естественно использовать при моделировании протекающих во времени процессов. При этом элементы очереди - это ожидаемые события, а их приоритет определяется временем, когда они произойдут.
Для получения официальных документов о завершении программы дополнительного профессионального образования (удостоверения о повышении квалификации, дипломов о профессиональной переподготовке и MBA) необходимо предоставить:
Внимание! Вы можете не заказывать доставку бумажной версии официального документы, а скачать его в электронном виде и распечатать самостоятельно. Информация о выданном документе в течение 1 месяца загружается в Федеральную информационную систему «Федеральный реестр сведений о документах об образовании и (или) о квалификации, документах об обучении» - ФИС ФРДО.
Доступ на новый сайт осуществляется с использованием адреса электронной почты, который был указан вами при регистрации на "старом". Мы постарались перенести все ваши данные с прежнего ресурса, однако не исключена вероятность потери части информации.
При возникновении проблемы со входом, воспользуйтесь функцией сброса пароля
Если вы обнаружите несоответствия, пожалуйста, сообщите нам.