18. Стеки

Стеком называется динамическая структура данных, добавление компоненты в которую и исключение компоненты из которой производится из одного конца, называемого вершиной стека. Стек работает по принципу LIFO(Last-In, First-Out) - "Поступивший последним, обслуживается первым".

Обычно над стеками выполняется три операции:

1) начальное формирование стека (запись первой компоненты);

2) добавление компоненты в стек;

3) выборка компоненты (удаление).

Для формирования стека и работы с ним необходимо иметь две переменные типа "указатель", первая из которых определяет вершину стека, а вторая - вспомогательная.

Пример. Составить программу, которая формирует стек, добавляет в него произвольное количество компонент, а затем читает все компоненты.

Program STACK;

uses Crt;

type

Alfa = String[10];

PComp = ^Comp;

Comp = Record

sD: Alfa;

pNext: PComp

end;

var

pTop: PComp;

sC: Alfa;

Procedure CreateStack(var pTop: PComp; var sC: Alfa);

begin

New(pTop);

pTop^.pNext:= NIL;

pTop^.sD:= sC;

end;

Procedure AddComp(var pTop: PComp; var sC: Alfa);

var pAux: PComp;

begin

NEW(pAux);

pAux^.pNext:= pTop;

pTop:= pAux;

pTop^.sD:= sC;

end;

Procedure DelComp(var pTop: PComp; var sC: ALFA);

begin

sC:= pTop^.sD;

pTop:= pTop^.pNext;

end;

begin

Clrscr;

writeln( ВВЕДИ СТРОКУ );

readln(sC);

CreateStack(pTop, sC);

repeat

writeln( ВВЕДИ СТРОКУ );

readln(sC);

AddComp(pTop, sC);

until sC = 'END';

Автор: Цветкова А.В.

<< Назад: Абстрактные структуры данных

>> Вперед: Очереди

Рекомендуем интересные статьи раздела Конспекты лекций, шпаргалки:

▪ Общая биология. Конспект лекций

▪ Рынок ценных бумаг. Шпаргалка

▪ Экономика недвижимости. Шпаргалка

Смотрите другие статьи раздела Конспекты лекций, шпаргалки.

Читайте и пишите полезные комментарии к этой статье.

<< Назад

Последние новости науки и техники, новинки электроники:

Тающие айсберги создают новые оазисы жизни на дне океана 30.06.2026

Глобальное потепление активно меняет облик нашей планеты, и одним из наиболее заметных его проявлений становится ускоренное таяние ледников в полярных регионах. Этот процесс не только приводит к подъему уровня Мирового океана, но и вызывает цепную реакцию в морских экосистемах, порой создавая неожиданные и парадоксальные последствия. Массовое высвобождение айсбергов из Гренландии - яркий пример того, как климатические изменения перестраивают жизнь в самых глубоких и удаленных уголках океана. Из-за повышения температуры количество айсбергов, откалывающихся от гренландских ледников, стремительно растет. Ученые проанализировали данные за последние 40 лет и установили, что с 2000 года поток ледяных глыб через пролив Фрама увеличился в четыре раза. Об этом сообщает Futurism со ссылкой на исследование специалистов из Технического университета Дании. Такое беспрецедентное нашествие айсбергов представляет серьезную опасность для международного судоходства. Одновременно оно радикально тра ...>>

Робот-тьютор Optio, помошник школьника 30.06.2026

Икусственный интеллект и робототехника все активнее помогают учителям и ученикам, делая обучение более персонализированным и увлекательным. Гуманоидные роботы, способные взаимодействовать с людьми естественным образом, открывают новые возможности для школ, особенно в условиях нехватки педагогических кадров и растущего интереса к технологиям. Одна из таких инновационных инициатив стартовала в американском штате Нью-Йорк. Компания Realbotix запустила своего помощника учителя на базе искусственного интеллекта под названием Optio в Центральном школьном округе Саламанки. Робот выступает в роли тьютора, предлагая персонализированное репетиторство, многоязычную помощь с домашними заданиями и круглосуточную академическую поддержку. По данным Interesting Engineering, проект направлен на повышение вовлеченности учащихся и внедрение передовых технологий в учебный процесс. В рамках пилотной программы школы округа планируют интегрировать человекоподобных роботов в классы. Изначально Optio буд ...>>

Биопрепараты повышают питательную ценность органической гречихи 29.06.2026

В органическом земледелии особое внимание уделяется не только урожайности, но и качественному составу продукции. Потребители все чаще выбирают продукты с высоким содержанием полезных веществ и без следов химических веществ. Исследования показывают, что применение биологических препаратов может существенно улучшить минеральный состав зерновых культур, делая их более ценными с точки зрения питания. В результате полевых экспериментов, проведенных в 2023-2025 годах, ученые установили, что использование биопрепаратов способствует активному накоплению макроэлементов, в частности фосфора и калия, в зерне органической гречихи. Об этом сообщила Леся Крупак из Белоцерковского национального аграрного университета в своей работе "Экологичность и производительность". Наиболее заметный эффект наблюдался при применении гумата калия. В этом случае содержание калия в зерне увеличивалось на 19-21 процент по сравнению с контрольными участками. Такой результат свидетельствует об улучшении работы тра ...>>

Случайная новость из Архива Глобальное потепление спровоцирует рекордное количество переселенцев 20.09.2019 Вскоре пятая часть населения Земли не сможет оставаться в своих странах из-за невыносимой жары. Исследователи Стэнфордского университета определили, что за грядущие тридцать лет 1,5 миллиарда людей станут вынужденными переселенцами из-за климатических изменений - жители околоэкваториальных территорий просто не смогут жить в созданных условиях. При этом, экономический разрыв между бедными и богатыми вырастет на 25%, а также обострятся конфликты и нестабильность в мире. В современном мире не существует такого понятия, как климатические переселенцы. Потому ни одна страна в мире не обязана принимать таких мигрантов, в соответствии с международной конвенцией ООН. Право на статус беженца имеют люди, которые меняют место жительства из-за обоснованного страха подвергнуться преследованиям по причине своей расы, религии, национальности, принадлежности к определенной социальной группе или политических убеждений. Ситуация в мире очень критическая - последний год показал, если отходы на нашей планеты будут выбрасываться такими темпами, то уже 2050 году на планете не останется ни одной зеленой зоны - средняя температура. Один месяц в году будет просто "смертоносным" и это не только для человека, а и для природы. Именно такая дата была названа научными сотрудниками Центра восстановления климата. Землю изменит кардинальной свой вид в космосе. Зеленые зон даже не будет на картах. Леса сгорят еще в первые годы на движения катастрофы.

Другие интересные новости:

▪ Беспилотный автомобиль от Nokia

▪ Полимерная присадка для увеличения нефтедобытии

▪ Робот для эвакуации раненых

▪ Лекарство само за себя говорит

▪ Наножилье для солнцелюбивых бактерий

Лента новостей науки и техники, новинок электроники

Интересные материалы Бесплатной технической библиотеки:

▪ раздел сайта Опыты по физике. Подборка статей

▪ статья Пешков Алексей Максимович (Максим Горький). Знаменитые афоризмы

▪ статья Кто изобрел термометр? Подробный ответ

▪ статья Бортоператор по проверке магистральных трубопроводов. Должностная инструкция

▪ статья Серебрение металлов. Простые рецепты и советы

▪ статья Опыты с сухим льдом. Физический эксперимент

Оставьте свой комментарий к этой статье:

www.diagram.com.ua
2000-2026