#include <stdio.h>
#include <limits.h>

/* #define iabs(a) ((a<0)?-(a):(a)) */
#define compdist(idx1,idx2) (iabs(RestDist[idx1]-RestDist[idx2]))

FILE *inpf;

int AnzRest, AnzDep, BestBew;
int RestDist[200], DepInd[30], BestDep[30];

int iabs(int a)
{
  int i;
  if(a<0)
  {
    i=-a;
  }
  else
  {
    i=a;
  }

  return i;
}

int FindDepot(int Depot[], int Restaurant)
{
  int i, dist;
  int bestDep=-1, min=INT_MAX;

  for(i=0; i<AnzDep; i++)
  {
    dist=compdist(Depot[i], Restaurant);
    if(dist<min)
    {
      bestDep=i; min=dist;
    }
  }

  return bestDep;
}


int bewerte(int Depot[])
{
  int i, sum, hilf;

  sum=0;
  for(i=0; i<AnzRest; i++)
  {
    hilf=FindDepot(Depot, i);
    sum=sum+compdist(i,Depot[hilf]);
  }
  return sum;
}


void recurse(int Anfang, int Position)
{
  int i, Bew;

  if(Position>=AnzDep)
  {
    Bew=bewerte(DepInd);
    if(Bew<BestBew)
    {
      BestBew=Bew;
      for(i=0; i<AnzDep; i++)
      {
         BestDep[i]=DepInd[i];
      }
    }
  }
  if(Anfang>=AnzRest) return;

  if(AnzDep-Position>AnzRest-Anfang) return;

  for(i=Anfang; i<AnzRest; i++)
  {
    DepInd[Position]=i;
    recurse(i+1, Position+1);
  }
}


int
main(void)
{
  int i, j, ChainNo, k;
  int MinR, MaxR;

  inpf=fopen("fastfood.in", "r");
  ChainNo=0;

  while(1)
  {
    (void)fscanf(inpf, "%d %d\n", &AnzRest, &AnzDep);

    if((AnzRest==0) && (AnzDep==0)) break;

    ChainNo++;

    for(i=0; i<AnzRest; i++)
    {
      (void)fscanf(inpf, "%d\n", &(RestDist[i]));
    }

    printf("Chain %d\n", ChainNo);

    BestBew=INT_MAX;
    recurse(0, 0);

    for(i=0; i<AnzDep; i++)
    {
      printf("Depot %d at restaurant %d ", i+1, BestDep[i]+1);
      MinR=-1;
      for(j=0; j<AnzRest; j++)
      {
        k=FindDepot(BestDep, j);
        if(k==i)
	{
          MaxR=j;
          if(MinR==-1) MinR=j;
	}
      }
      if(MinR<MaxR)
      {
        printf("serves restaurants %d to %d\n", MinR+1, MaxR+1);
      }
      else
      {
        printf("serves restaurant %d\n", MinR+1);
      }
    }

    printf("Total distance sum = %d\n\n", bewerte(BestDep));
  }

  fclose(inpf);

  return 0;
}