Сложная Структура Данных

[diliana]

Всем приветики!

А вот у меня такое задание - надо создать некую ссложную струк-ру данных, например массив из динам-х очередей со всеми типовыми операциями для этой струк-ры
Это все я представляю так - создается некий массив, элементами которого должны быть собственно очереди, а очереди заполняются нашими данными (например с типом integer)

А вот как я это предварительно реализовала (пожалуста посмотрите правильно ли я это реализовала, может есть ошибки).

program Project_MQ;

{описание структуры}
const
  N = 100;
Type
{очередь}
  pQu = ^TQueue;{}
  TQueue = record {}
    data : integer; {данные}
    next : pQu;
    end;

{массив}
  TMassQu = array [1..N] of pQu;


var
 head, last: pQu;{указатели начала и конца очереди}

{операции с очередью}
Procedure AddQ();// добавление элемента в очередь
Procedure ScanQ(); // просмотр
Procedure DeleteQ();// удаление элемента
Procedure SaveQ(); // сохранение очер-ди в файл
Procedure LoadQ();// загрузка из файла

{операции с массивом}
Procedure AddMasQ();// добавление очереди в массив
Procedure ScanMasQ(); // просмотр массива
Procedure SearchMasQ(); // поиск в массиве
Procedure DeleteMasQ();// удаление очереди из массива
Procedure SaveMasQ(); // сохранение массива в файл
Procedure LoadMasQ();// загрузка из файла


begin
{меню управления}
end.

[Stilet]

Помоему ты просо динамический список описала
Чесно говоря под фразой

некую ссложную струк-ру данных

Я бы понял дерево.
Может тебе его составить?

[diliana]

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

Помоему ты просо динамический список описала
Чесно говоря под фразой
Я бы понял дерево.
Может тебе его составить?

Привет Stilet

Нет, дерево не надо, а надо именно массив из очер-ей
Я описала на мой взгляд именно такую сложную структруру

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

  
type
  pQu = ^TQueue;{}
  TQueue = record {}
    data : integer; {данные}
    next : pQu;
    end;

ввела собственно массив

type
 TMassQu = array [1..N] of pQu;

затем переменные

var
 head, last: pQu;{указатели начала и конца очереди}
 mass: TMassQu; {для работы с массивом}

Вроде все логично. Разве это неправильно???

[Stilet]

Разве это неправильно???

Ок. Спорить не буду... В принципе это можно считать сложной структурой.

P.S. А может обернуть это в классы, или вам такого еще не давали?

[diliana]

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

Ок. Спорить не буду... В принципе это можно считать сложной структурой.

P.S. А может обернуть это в классы, или вам такого еще не давали?

Значит сделала правильно!
А классы и обьекты (ооп) только вот начали изучать в этом учебном году!
Но сначала надо это описать классическим способом, а потом тоже самое, но уже классами!

[Stilet]

а потом тоже самое, но уже классами!

Ну если что пиши
С классами ИМХО проще работать...

[diliana]

delete....