Предыдущая страница реферата | 5  6  7  8  9  10  11  12  13  14  15 | Следующая страница реферата

              X := Vsp^.Inf;

              Dispose(Vsp);

      End;

 

      Procedure V_Spisok;

      Var Vsp : U;

      Begin

          New(Vsp);

          Vsp^.Inf := X;

          Vsp^.Next := Pred^.Next;

          Pred^.Next := Vsp;

      End;

 

      Procedure Iz_Spiska;

      Var Vsp : U;

      Begin

           Vsp := Pred^.Next;

           Pred^.Next := Pred^.Next^.Next;

           X := Vsp^.Inf;

           Dispose(Vsp);

      End;

 

      Procedure Ochistka;

      Var Vsp : BT;

      Begin

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



Предыдущая страница реферата | 5  6  7  8  9  10  11  12  13  14  15 | Следующая страница реферата

Поделитесь этой записью или добавьте в закладки