указатели(очередь)

[qwerty1993]

написать на паскале или делфи
Создать структуру данных очередь с заданным набором функции:
-создать пустую очередь
-проверить очередь на пустоту
-добавить элемент в очередь
-удалить элемент из очереди
-вывод на просмотр всех элементов очереди

помигите плиз очень нужно...
заранее спасибо!

[savva]

Паскаль делфи я уже не помню,напишу словами.

делаешь структуру
struct queue

тут указатель типа queue
тут какие-то данные типа x:integer;

далее в программе создаётся указатель на начало списка queue


далее делаешь набор функций

-создать пустую очередь

функция которая возвращает тип queue

создаёшь указатель на голову списка.

-проверить очередь на пустоту

функция возвращает тип boolean

if (head==null) вернуть true
else вернуть false

-добавить элемент в очередь

процедура в неё передаёшь указатель на голову.
запрашиваешь у пользователя данные
создаёшь объект типа queue
if (head==null)
ставишь указатель головы на этот объект
обнуляешь у этого объекта ссылку на следующий элемент
добавляешь данные введённые пользователем в объект
else head!=null
тогда проводишь по списку поиск с помощью дополнительного указателя типа queue(x например)
while (x!=null)
x=x.next;
и добавляешь как я писал выше только вместо head будет x

-удалить элемент из очереди

какой элемент? в начале? в конце? или по номеру в очереди?

-вывод на просмотр всех элементов очереди

с помощью
"тогда проводишь по списку поиск с помощью дополнительного указателя типа queue(x например)
while (x!=null)
x=x.next;"
делаешь вывод данных

[Rin]

Я б помог, но спать очень хочется и строчить весь код проги в лом. скачай отсюда
Владимир Попов. Паскаль и Дельфи. Самоучитель.
и приблизительно на 145-150 странице будет всё, что тебе надо.
Кажется там только проверки нет. Делается так:

type 
TYkazatel=^zapis;
 zapis= record
   i:integer;
   next:TYkazatel;
.......
var
P, First: Tykazatel;
.......
if first=nil then writeln('CnuCoK nyCT');

[Serge_Bliznykov]

Сообщение от Rin

и приблизительно на 145-150 странице будет всё, что тебе надо.

ну, скорее страницы 287-294
и реализации конкретно ОЧЕРЕДИ я там не увидел.
Впрочем, представленной там информации и примеров вполне достаточно, чтобы разобраться в теме и написать код самостоятельно.

ещё на форуме можно посмотреть примеры реализации очереди:

Очередь

Решить используя очередь

Создать очередь из n целых чисел

p.s. а вот мне интересно, те, кто дают подобные задания, знают ли, что согласно классическому определению очереди в программировании (см. например, википедию), она всегда FIFO (First In-First Out) - первым пришёл, первым ушёл. Поэтому получить элемент можно всегда ТОЛЬКО с головы очереди, при этом он из очереди УДАЛЯЕТСЯ. Добавлять можно только исключительно в КОНЕЦ очереди.
поэтому:
>вывод на просмотр всех элементов очереди
автоматически должен приводить к полной очистке очереди..