Лаб работа: создать стек на базе 2 очередей Опции

[Katrin]

Помогите создать стек на базе 2 очередей,
т. к. в очередной раз пропустила лекцию по Паскалю.

[GLuk]

2Alex:
А ты думаешь это не реализация стека на базе двух очередей??
На всякий случай (реализация на Пасе):

Код

Var P,P2:Pointer;
begin
GetMem(P,$FFFF);
GetMem(P2,$FFFF);
InitStack;
end.

Процедуру InitStack поисывать не буду, потому что ее сделает ___Alex___, который понимает, что нужно не ПОМОЧЬ, а СДЕЛАТЬ девушке ее лабу...

Сообщение отредактировано: volvo - 17.12.2004 18:06