Collections: Stack
Материал из Вики ИТ мехмата ЮФУ
Версия от 19:41, 30 апреля 2009; Juliet (обсуждение | вклад)
Интерфейс
type Stack<T> = class
/// Создает пустой стек
constructor Create;
/// Кладет элемент x на вершину стека
procedure Push(x: DataType);
/// Возвращает значение элемента на вершине, снимая его со стека
function Pop: DataType;
/// Возвращает значение элемента на вершине стека, не снимая его
function Top: DataType;
/// Возвращает истину, если стек пуст
function IsEmpty: boolean;
/// Выводит содержимое стека на консоль
procedure Println();
end;