Массив из двух очередей

struct spis
{
 int data;
 struct spis *prev;  
 struct spis *next;
};
struct spis *head, *tail;
void main ()
 {
  struct spis *c0,*c1;

<Расщепление (S, a, b, n)>
p:= 1
DO (p < n)
   <инициализация очередей c0, c1>
   i:=0, m:=n
   DO (m > 0)
      IF (m ≥ p) q:=p ELSE q:=m FI
      m:= m – q
      IF (m ≥ p) r:=p ELSE r:=m FI
      m:= m – r
      <слияние(a, q, b, r, ci )>
      i:=1–i
   OD
   a:=c0.Head, b:=c1.Head
   p:=2p
OD
c0.Tail → next:=NIL
S:=c0.Head

void merge(int *a, long lb, long split, long ub) {
// Слияние упорядоченных частей массива в буфер temp
// с дальнейшим переносом содержимого temp в a[lb]...a[ub]
  // текущая позиция чтения из первой последовательности a[lb]...a[split]
  long pos1=lb;
 
  // текущая позиция чтения из второй последовательности a[split+1]...a[ub]
  long pos2=split+1;
 
  // текущая позиция записи в temp
  long pos3=0;
 
  int *temp = new int[ub-lb+1];
 
  // идет слияние, пока есть хоть один элемент в каждой последовательности
  while (pos1 <= split && pos2 <= ub) {
    if (a[pos1] < a[pos2])
      temp[pos3++] = a[pos1++];
    else
      temp[pos3++] = a[pos2++];
  }
  // одна последовательность закончилась -
  // копировать остаток другой в конец буфера
  while (pos2 <= ub)   // пока вторая последовательность непуста
    temp[pos3++] = a[pos2++];
  while (pos1 <= split)  // пока первая последовательность непуста
    temp[pos3++] = a[pos1++];
 
  // скопировать буфер temp в a[lb]...a[ub]
  for (pos3 = 0; pos3 < ub-lb+1; pos3++)
    a[lb+pos3] = temp[pos3];
 
  delete []temp;
}
 
void mergeSort(int *A, int lb,int  ub)
{
    long split;                   // индекс, по которому делим массив
    if (lb < ub)
    {                // если есть более 1 элемента
        split = (lb + ub)/2;
       // cout << split<<endl;
        mergeSort(A, lb, split);       // сортировать левую половину
        mergeSort(A, split+1, ub);// сортировать правую половину
        merge(A, lb, split, ub);    // слить результаты в общий массив
    }
}

#include  <stdio.h>
#include  <conio.h>
#include <time.h>
#include  <stdlib.h>
#include <alloc.h>
#include <math.h>
#define ESC 27
typedef struct SPIS
{
 int data;
 struct SPIS *prev;
 struct SPIS *next;
}spis ;
typedef struct QUEUE
{
 int data;
 struct QUEUE *prev; 
 struct QUEUE *next; 
} queue;
 
void create (int *mas, int n);*
void separation (spis *S,
         spis **a,
         spis **b,
         int n);
void init (queue*);
spis *head, *tail;*
queue *first, *last;
 
void main ()
 {
  long i, //*®¬Ґа *ЄвЁў*®© ®зҐаҐ¤Ё
  n,//Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ў бЇЁбЄҐ
  sum,
  p,//ЇаҐ¤Ї®«*Ј*Ґ¬л© а*§¬Ґа бҐаЁЁ
  q,//д*ЄвЁзҐбЄЁ© а*§¬Ґа бҐаЁЁ ў бЇЁбЄҐ *
  r,//д*ЄвЁзҐбЄЁ© а*§¬Ґа бҐаЁЁ ў бЇЁбЄҐ b
  m;//⥪г饥 Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ў бЇЁбЄ*е a Ё b
  int *mas;  //¬*ббЁў ¤«п д®а¬Ёа®ў**Ёп Ї®б«Ґ¤®ў*⥫м*®бвЁ зЁбҐ«
  char key;
  spis *S,*a,*b; //а*Ў®зЁҐ бЇЁбЄЁ
  queue *c0,*c1;
  do
  {
   sum=0;
   randomize();
   clrscr ();
   fflush(stdin);
   printf("\n ‚ўҐ¤ЁвҐ §**зҐ*ЁҐ n - Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ¬*ббЁў*   ");
   scanf("%d",&n);
   mas=(int*)malloc(n*sizeof (int));
   for (i=0; i<n; i++)
    {
     mas[i]=random(100);
     sum+=mas[i]; //Ї®¤бзҐв Є®*ва®«м*®© б㬬л
    }
   create(mas,n);
   separation (head,&a,&b,n);
   p=1;
   while (p<n)
   {
    //Ё*ЁжЁ*«Ё§*жЁп ®зҐаҐ¤Ґ©
    init(c0);
    init(c1);
 
    i=0;
    m=n;
    while (m>0)
    {
     if (m>=p)
      q=p;
     else
      q=m;
     m=m-r;
     //б«Ёп*ЁҐ
     i=1-i;
    }
   a=c0.first;
   b=c1.head;
   p=2*p;
   }
   c0.tail->next=NULL;
   S=c0.head;
 
 
   printf("\n ‘®авЁа®ўЄ* ¬Ґв®¤®¬ ?Ґ««*");
   printf("\n „«п б«гз*©*®© Ї®б«Ґ¤®ў*⥫м*®бвЁ:");
  // Shell (mas,n,sum);
   printf(" „«п гЇ®а冷зҐ**®© Ї®б«Ґ¤®ў*⥫м*®бвЁ:");
  // Shell (mas,n,sum);
   free(mas);
   puts ("\n ‚ўҐбвЁ ¤агЈ®Ґ Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ¬*ббЁў*? (ЌҐв=Esc)");
   key=getch();
  }
  while (key!=ESC);
 }
 
void create (int *mas, int n)
{
 int i;
 spis *p,
  *pred;//гЄ*§*⥫м ** ЇаҐ¤л¤гйго бвагЄвгаг
 pred=NULL;
 for (i=0;i<n;++i)
 {
  p=(spis*) malloc(sizeof(spis));
  p->data=mas[i];
  p->prev=pred;
  if (pred!=NULL)//Ґб«Ё бЇЁб®Є *Ґ Їгбв
   pred->next=p;//*®ўл© н«Ґ¬Ґ*в бв**®ўЁвбп б«Ґ¤гойЁ¬
  else //Ґб«Ё бЇЁб®Є Їгбв
   head=p;//ᮧ¤**ЁҐ ЇҐаў®Ј® н«Ґ¬Ґ*в* бЇЁбЄ*
  pred=p;
 }
 tail=p;
 tail->next=NULL;
}
 
void separation (spis *S,
         spis **a,
         spis **b,
         int n)
{
  spis *k,*p;long i;
  *a=S;
  *b=S->next;
  n=0;
  k=*a;
  p=*b;
  while(p!=NULL)
  {
   ++n;
   k->next=p->next;
   k=p;
   p=p->next;
  }
 
}
 
 void init  (queue *c)
 {
    c=(queue*) malloc(sizeof(queue);
    first=NULL;
    c=first;
    last=NULL;
    c=last;
 }

void create (int *mas, int n);*

spis *head, *tail;*

queue *first, *last;

void create (int *mas, int n);*

#include  <stdio.h>
#include  <conio.h>
#include <time.h>
#include  <stdlib.h>
#include <alloc.h>
#include <math.h>
#define ESC 27
typedef struct SPIS
{
 int data;
 struct SPIS *next; // гЄ*§*⥫м ** Ї®б«Ґ¤гойго бвагЄвгаг
} spis ;
void create (int n);//ᮧ¤**ЁҐ бЇЁбЄ*
void separation (spis *,
         spis **a,
         spis **b,
         int n);//а*§¤Ґ«Ґ*ЁҐ*/
void Mergesort(spis **a, spis **b);
spis *head, *tail;//гЄ*§*⥫м ** **з*«® Ё Є®*Ґж бЇЁбЄ*
 
void main ()
 {
  long n;//Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ў бЇЁбЄҐ
  char key;
  spis *a,*b; //а*Ў®зЁҐ бЇЁбЄЁ
  head=NULL;
  tail=NULL;
  do
  {
   randomize();
   clrscr ();
   fflush(stdin);
   printf("\n ‚ўҐ¤ЁвҐ §**зҐ*ЁҐ n - Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ¬*ббЁў*   ");
   scanf("%d",&n);
   create(n);
   separation (head,&a,&b,n);
   Mergesort (&a, &b);
 
 
   puts ("\n ‚ўҐбвЁ ¤агЈ®Ґ Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ¬*ббЁў*? (ЌҐв=Esc)");
   key=getch();
  }
  while (key!=ESC);
 }
 
void create (int n)
{
 long i,sum=0;
 spis *p;
 int *mas;  //¬*ббЁў ¤«п д®а¬Ёа®ў**Ёп Ї®б«Ґ¤®ў*⥫м*®бвЁ зЁбҐ«
 mas=(int*)malloc(n*sizeof (int));
   for (i=0; i<n; i++)
    {
     mas[i]=random(100);
     sum+=mas[i]; //Ї®¤бзҐв Є®*ва®«м*®© б㬬л
    }
 for (i=0;i<n;++i)
 {
  p=(spis *)malloc(sizeof(spis));//ўл¤Ґ«пҐ¬ Ї*¬пвм ¤«п ЇҐаў®© §*ЇЁбЁ
  p->data=mas[i];
  p->next=NULL;
  if (head==NULL) //ᮧ¤*Ґ¬ ЇҐаўл© н«Ґ¬Ґ*в ®зҐаҐ¤Ё
  {
   head=p;//Ґб«Ё ®зҐаҐ¤м б®бв®Ёв Ё§ ®¤*®Ј® н«Ґ¬Ґ*в*, в® §**зҐ*Ёп гЄ*§*⥫Ґ©
   tail=p;//** ЇҐаўл© Ё Ї®б«Ґ¤*Ё© н«Ґ¬Ґ*вл б®ўЇ*¤*ов
  }
  else
  {
   tail->next=p;//*®ўл© н«Ґ¬Ґ*в ЇаЁб®Ґ¤Ё*пҐвбп Є Ї®б«Ґ¤*Ґ¬г н«Ґ¬Ґ*вг ®зҐаҐ¤Ё
   tail=p;//*®ўл© н«Ґ¬Ґ*в ®Ўкпў«пҐвбп Ї®б«Ґ¤*Ё¬
   }
  }
  free(mas);
}
 
 
 
void separation (spis *head,
         spis **a,
         spis **b,
         int n)
{
  spis *S;long i;
  S=head;
  *a=S;
  *b=S->next;
  n=0;
  while((*b)!=NULL)
  {
   ++n;
   (*a)->next=(*b)->next;
   *a=*b;
   *b=(*b)->next;
  }
 
}
 
void Mergesort (spis **a, spis **b)
{
 long i, //*®¬Ґа *ЄвЁў*®© ®зҐаҐ¤Ё
  n,//Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ў бЇЁбЄҐ
  p,//ЇаҐ¤Ї®«*Ј*Ґ¬л© а*§¬Ґа бҐаЁЁ
  q,//д*ЄвЁзҐбЄЁ© а*§¬Ґа бҐаЁЁ ў бЇЁбЄҐ *
  r,//д*ЄвЁзҐбЄЁ© а*§¬Ґа бҐаЁЁ ў бЇЁбЄҐ b
  m;//⥪г饥 Є®«ЁзҐбвў® н«Ґ¬Ґ*в®ў ў бЇЁбЄ*е a Ё b
  char key;
  spis *S, *c0,*c1; //а*Ў®зЁҐ бЇЁбЄЁ
  p=1;
   while (p<n)
   {
    //Ё*ЁжЁ*«Ё§*жЁп ®зҐаҐ¤Ґ©
    c0->(*head)=NULL;
    c1->head=NULL;
 
    i=0;
    m=n;
    while (m>0)
    {
     if (m>=p)
      q=p;
     else
      q=m;
     m=m-r;
     //б«Ёп*ЁҐ
     i=1-i;
    }
   a=(*c0)->head;
   b=c1->head;
   p=2*p;
   }
   (c0->tail)->next=NULL;
   S=c0->head;
 
}
 
 
void init  (spis **c)
 {
    spis *C;
    C=*c;
    head=NULL;
    tail=NULL;
    head=C;
    tail=C;
 }

SPIS * lists = new SPIS[5];

SPIS lists[5];

c0->(*head)=NULL;
   a=(*c0)->head;

c0->(*head)=NULL;

с0->next = NULL;

*a=(*c0)->head;

a = co->next;