qbaj.c

programs in <C program design>

# include "stdlib.h"
void qbaj(p,n,m,k)
 int n,m,k,p[];
{ int i,j,l,*b;
  b=malloc(n*sizeof(int));
    for (i=0;i<=n-1;i++) b[i]=i+1;
  k=k-1;
b[n-1]=0;
  for (i=0;i<=n-1;i++)
    { for (j=1;j<=m-1;j++)
      { l=k;k=b[k]; }
     p[i]=k+1;b[l]=b[k];k=b[k];
}
free(b);
return;}