#include <bits/stdc++.h>
using namespace std;
template <class F, class T>
T convert(F a, int p = -1) {
  stringstream ss;
  if (p >= 0) ss << fixed << setprecision(p);
  ss << a;
  T r;
  ss >> r;
  return r;
}
template <class T>
T gcd(T a, T b) {
  T r;
  while (b != 0) {
    r = a % b;
    a = b;
    b = r;
  }
  return a;
}
template <class T>
T lcm(T a, T b) {
  return a / gcd(a, b) * b;
}
template <class T>
T sqr(T x) {
  return x * x;
}
template <class T>
T cube(T x) {
  return x * x * x;
}
template <class T>
int getbit(T s, int i) {
  return (s >> i) & 1;
}
template <class T>
T onbit(T s, int i) {
  return s | (T(1) << i);
}
template <class T>
T offbit(T s, int i) {
  return s & (~(T(1) << i));
}
template <class T>
int cntbit(T s) {
  return s == 0 ? 0 : cntbit(s >> 1) + (s & 1);
}
const int bfsz = 1 << 16;
char bf[bfsz + 5];
int rsz = 0;
int ptr = 0;
char gc() {
  if (rsz <= 0) {
    ptr = 0;
    rsz = (int)fread(bf, 1, bfsz, stdin);
    if (rsz <= 0) return EOF;
  }
  --rsz;
  return bf[ptr++];
}
void ga(char &c) {
  c = EOF;
  while (!isalpha(c)) c = gc();
}
int gs(char s[]) {
  int l = 0;
  char c = gc();
  while (isspace(c)) c = gc();
  while (c != EOF && !isspace(c)) {
    s[l++] = c;
    c = gc();
  }
  s[l] = '\0';
  return l;
}
template <class T>
bool gi(T &v) {
  v = 0;
  char c = gc();
  while (c != EOF && c != '-' && !isdigit(c)) c = gc();
  if (c == EOF) return false;
  bool neg = c == '-';
  if (neg) c = gc();
  while (isdigit(c)) {
    v = v * 10 + c - '0';
    c = gc();
  }
  if (neg) v = -v;
  return true;
}
int n;
vector<int> V1, V2, V3;
int main() {
  int a;
  cin >> n;
  for (int i = 0; i < (n); ++i) {
    cin >> a;
    if (a < 0) V1.push_back(a);
    if (a > 0) V2.push_back(a);
    if (a == 0) V3.push_back(a);
  }
  if (((int)(V2).size()) == 0) {
    V2.push_back(V1[((int)(V1).size()) - 1]);
    V1.pop_back();
    V2.push_back(V1[((int)(V1).size()) - 1]);
    V1.pop_back();
  }
  if (((int)(V1).size()) % 2 == 0) {
    V3.push_back(V1[((int)(V1).size()) - 1]);
    V1.pop_back();
  }
  cout << ((int)(V1).size());
  for (int i = 0; i < (((int)(V1).size())); ++i) cout << " " << V1[i];
  puts("");
  cout << ((int)(V2).size());
  for (int i = 0; i < (((int)(V2).size())); ++i) cout << " " << V2[i];
  puts("");
  cout << ((int)(V3).size());
  for (int i = 0; i < (((int)(V3).size())); ++i) cout << " " << V3[i];
  puts("");
  return 0;
}
