#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>

int N;				/* Počet nádraží */
struct vertex {			/* Jeden vrchol, tedy půlka nástupiště */
  int x, y;			/* Nádraží a nástupiště */
  int h;			/* Která polovina to je: 0=levá, 1=pravá */
  struct edge *left, *right;	/* První hrana doleva a doprava */
  struct vertex *next;		/* Další vrchol ve frontě při hledání do šířky */
  struct edge *back;		/* Zpětný odkaz při hledání do šířky */
  int flag;			/* Univerzální značka, v klidu nulová */
};
int *N2V;			/* Číslo vrcholu prvního nástupiště pro každé nádraží */
struct vertex *V;		/* Pole vrcholů */
struct edge {			/* Jedna hrana, tedy trať */
  struct edge *next;		/* Následující pro totéž nástupiště */
  struct edge *twin;		/* Sestřička v protisměru */
  struct vertex *dest;		/* Cílový vrchol */
  int red;			/* 0=modrá, 1=červená */
};

void *malloc_zero(unsigned int size)
{				/* Alokuje a vynuluje blok paměti */
  void *x = malloc(size);
  if (!size) exit(1);
  memset(x, 0, size);
  return x;
}

void add_edge(struct vertex *x, struct vertex *y)
{				/* Přidá jednu hranu v obou směrech */
  struct edge *e = malloc_zero(2*sizeof(struct edge));
  struct edge *f = e+1;
  e->next = x->right;
  x->right = e;
  e->twin = f;
  e->dest = y;
  f->next = y->left;
  y->left = f;
  f->twin = e;
  f->dest = x;
}

void read_input(void)
{				/* Načte vstup a vytvoří graf */
  scanf("%d", &N);		/* Počet nádraží */
  N2V = malloc_zero(sizeof(int) * (N+2));
  for (int i=1; i<=N; i++)	/* Počty nástupišť */
    {
      int k;
      scanf("%d", &k);
      N2V[i+1] = N2V[i] + k;
    }
  int n = N2V[N+1];		/* Prvních n jsou levé poloviny, dalších n pravé */
  V = malloc_zero(sizeof(struct vertex) * 2 * n);
  for (int i=1; i<=N; i++)	/* Dělíme nástupiště na vrcholy */
    for (int j=N2V[i]; j<N2V[i+1]; j++)
      {
	V[j+n].x = V[j].x = i;
	V[j+n].y = V[j].y = j-N2V[i]+1;
	V[j+n].h = 1;
	add_edge(&V[j], &V[j+n]);
      }
  int T;			/* Počet tratí */
  scanf("%d", &T);
  while (T--)			/* Trati */
    {
      int x1, y1, x2, y2;
      scanf("%d%d%d%d", &x1, &y1, &x2, &y2);
      add_edge(&V[N2V[x1]+y1-1+n], &V[N2V[x2]+y2-1]);
    }
}

void add_to_queue(struct vertex ***qlastp, struct vertex *v, struct edge *back)
{
  if (!v->flag)
    {
      **qlastp = v;
      v->next = NULL;
      *qlastp = &v->next;
      v->back = back;
      v->flag = 1;
    }
}

struct vertex *find_improving_path(void)
{				/* Nalezne zlepšující cestu a vrátí, kde skončila */
  struct vertex *queue = NULL, **qlast = &queue;
  for (int i=N2V[1]; i<N2V[2]; i++)
    add_to_queue(&qlast, &V[i], NULL);	/* Naplníme frontu vrcholy z vrstvy 0 */
  struct vertex *qfirst = queue; /* Schováme si, kde fronta začínala */
  while (queue && (queue->x != N || !queue->h))
    {
      for (struct edge *e = queue->right; e; e=e->next)
	if (!e->red)		/* Po modrých hranách doprava */
	  add_to_queue(&qlast, e->dest, e);
      for (struct edge *e = queue->left; e; e=e->next)
	if (e->red)		/* Po červených hranách doleva */
	  add_to_queue(&qlast, e->dest, e);
      queue = queue->next;
    }
  /* Ještě potřebujeme smazat všechny značky */
  while (qfirst)
    {
      qfirst->flag = 0;
      qfirst = qfirst->next;
    }
  return queue;
}

void improve_along_path(struct vertex *v)
{				/* Zlepší podél nalezené cesty */
  while (v->back)
    {
      v->back->red ^= 1;
      v->back->twin->red ^= 1;
      v = v->back->twin->dest;
    }
}

void find_tracks(void)
{				/* Nalezne podle vyvážené množiny trasy vlaků */
  for (int i=N2V[1]; i<N2V[2]; i++)
    {
      struct vertex *v = &V[i];
      for(;;)
	{
	  struct edge *e;
	  while ((e = v->right) && !e->red)
	    v->right = e->next;
	  if (!e)
	    break;
	  if (!v->h)
	    printf("(%d,%d) ", v->x, v->y);
	  v->right = e->next;
	  v = e->dest;
	}
      if (v->h)
	putchar('\n');
    }
}

int main(void)
{
  read_input();
  struct vertex *v;
  while (v = find_improving_path())
    improve_along_path(v);
  find_tracks();
  return 0;
}