Collections: SimpleSet — различия между версиями
Материал из Вики ИТ мехмата ЮФУ
Juliet (обсуждение | вклад) |
Juliet (обсуждение | вклад) |
||
Строка 21: | Строка 21: | ||
== Реализация == | == Реализация == | ||
<source lang="Delphi"> | <source lang="Delphi"> | ||
+ | interface | ||
+ | |||
+ | uses Nodes; // для использования типа SingleNode<DataType> — | ||
+ | // узла с одним полем связи | ||
+ | |||
+ | |||
+ | implementation | ||
+ | |||
</source> | </source> |
Версия 19:54, 30 апреля 2009
Интерфейс
type SimpleSet<DataType> = class
/// Создает пустое множество
constructor Create;
/// Добавляет элемент x во множество, если его там еще нет
procedure Add(x: DataType);
/// Удаляет элемент x из множества, если он там есть
procedure Remove(x: DataType);
/// Возвращает истину, если множество содержит элемент x
function Contains(x: DataType): boolean;
///Выводит содержимое множества на консоль
procedure Println();
end;
Реализация
interface
uses Nodes; // для использования типа SingleNode<DataType> —
// узла с одним полем связи
implementation