Problem: A group of n friends enjoys playing popular video game Toda 2. There is a rating system describing skill level of each player, initially the rating of the i-th friend is ri.

The friends decided to take part in the championship as a team. But they should have equal ratings to be allowed to compose a single team consisting of all n friends. So the friends are faced with the problem: how to make all their ratings equal.

One way to change ratings is to willingly lose in some matches. Friends can form a party consisting of two to five (but not more than n) friends and play a match in the game. When the party loses, the rating of each of its members decreases by 1. A rating can't become negative, so ri = 0 doesn't change after losing.

The friends can take part in multiple matches, each time making a party from any subset of friends (but remember about constraints on party size: from 2 to 5 members).

The friends want to make their ratings equal but as high as possible.

Help the friends develop a strategy of losing the matches so that all their ratings become equal and the resulting rating is maximum possible.

Input

The first line contains a single integer n (2 ≤ n ≤ 100) — the number of friends.

The second line contains n non-negative integers r1, r2, ..., rn (0 ≤ ri ≤ 100), where ri is the initial rating of the i-th friend.

Output

In the first line, print a single integer R — the final rating of each of the friends.

In the second line, print integer t — the number of matches the friends have to play. Each of the following t lines should contain n characters '0' or '1', where the j-th character of the i-th line is equal to:

  * '0', if friend j should not play in match i, 
  * '1', if friend j should play in match i. 



Each line should contain between two and five characters '1', inclusive.

The value t should not exceed 104, it is guaranteed that such solution exists. 

Remember that you shouldn't minimize the value t, but you should maximize R. If there are multiple solutions, print any of them.

Examples

Input

5
4 5 1 7 4


Output

1
8
01010
00011
01010
10010
00011
11000
00011
11000


Input

2
1 2


Output

0
2
11
11


Input

3
1 1 1


Output

1
0

Solution (in CPP):

Solution:
#include <bits/stdc++.h>
using namespace std;
long long power(long long x, long long y);
long long mpower(long long x, long long y, long long p);
long long modInv(long long a, long long m);
long long gcdExtended(long long a, long long b, long long *x, long long *y);
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  long long t, i, j, k, l, p, q, r, x, y, z, a, b, c, d, f, n, m,
      M = 1000000007;
  string s;
  vector<long long> v, w;
  vector<long long>::iterator itrv;
  unordered_map<long long, long long> N;
  set<pair<long long, long long> > S;
  set<pair<long long, long long> >::iterator itr;
  cin >> n;
  long long A[n];
  x = LLONG_MAX;
  for (i = 0; i < n; i++) {
    cin >> A[i];
    x = min(x, A[i]);
  }
  f = 0;
  for (i = x; i > 0; i--) {
    p = 0;
    y = 0;
    for (j = 0; j < n; j++) {
      q = A[j] - i;
      p += q;
      y = max(y, q);
    }
    if (p < (2 * y)) {
      continue;
    }
    for (j = 10000; j >= 0; j--) {
      z = p - (j * 2);
      if (z < 0) {
        continue;
      }
      if (z % 5 == 0) {
        f = 1;
        break;
      }
    }
    if (f == 1) {
      break;
    }
  }
  cout << i << "\n";
  pair<long long, long long> aa, bb, cc, dd, ee;
  if (f == 0) {
    q = 0;
    p = 0;
    for (i = 0; i < n; i++) {
      p += A[i];
      q = max(q, A[i]);
    }
    x = ceil(p / 2.0);
    x = max(x, q);
    cout << x << "\n";
    for (i = 0; i < n; i++) {
      S.insert({A[i], i});
    }
    for (i = 0; i < x; i++) {
      itr = S.end();
      itr--;
      aa = *itr;
      itr--;
      bb = *itr;
      for (j = 0; j < n; j++) {
        if (j == aa.second || j == bb.second) {
          cout << 1;
        } else {
          cout << 0;
        }
      }
      itr = S.find(aa);
      S.erase(itr);
      aa.first = max((long long)0, aa.first - 1);
      S.insert(aa);
      itr = S.find(bb);
      S.erase(itr);
      bb.first = max((long long)0, bb.first - 1);
      S.insert(bb);
      cout << "\n";
    }
  } else {
    p = j + (z / 5);
    z = j;
    cout << p << "\n";
    for (i = 0; i < n; i++) {
      S.insert({A[i], i});
    }
    for (i = 0; i < p; i++) {
      if (i < z) {
        itr = S.end();
        itr--;
        aa = *itr;
        itr--;
        bb = *itr;
        for (j = 0; j < n; j++) {
          if (j == aa.second || j == bb.second) {
            cout << 1;
          } else {
            cout << 0;
          }
        }
        itr = S.find(aa);
        S.erase(itr);
        aa.first = max((long long)0, aa.first - 1);
        S.insert(aa);
        itr = S.find(bb);
        S.erase(itr);
        bb.first = max((long long)0, bb.first - 1);
        S.insert(bb);
      } else {
        itr = S.end();
        itr--;
        aa = *itr;
        itr--;
        bb = *itr;
        itr--;
        cc = *itr;
        itr--;
        dd = *itr;
        itr--;
        ee = *itr;
        for (j = 0; j < n; j++) {
          if (j == aa.second || j == bb.second || j == cc.second ||
              j == dd.second || j == ee.second) {
            cout << 1;
          } else {
            cout << 0;
          }
        }
        itr = S.find(aa);
        S.erase(itr);
        aa.first = max((long long)0, aa.first - 1);
        S.insert(aa);
        itr = S.find(bb);
        S.erase(itr);
        bb.first = max((long long)0, bb.first - 1);
        S.insert(bb);
        itr = S.find(cc);
        S.erase(itr);
        cc.first = max((long long)0, cc.first - 1);
        S.insert(cc);
        itr = S.find(dd);
        S.erase(itr);
        dd.first = max((long long)0, dd.first - 1);
        S.insert(dd);
        itr = S.find(ee);
        S.erase(itr);
        ee.first = max((long long)0, ee.first - 1);
        S.insert(ee);
      }
      cout << "\n";
    }
  }
  return 0;
}
long long modInv(long long a, long long m) {
  long long x, y;
  long long g = gcdExtended(a, m, &x, &y);
  long long res = (x % m + m) % m;
  return res;
}
long long gcdExtended(long long a, long long b, long long *x, long long *y) {
  if (a == 0) {
    *x = 0, *y = 1;
    return b;
  }
  long long x1, y1;
  long long gcd = gcdExtended(b % a, a, &x1, &y1);
  *x = y1 - (b / a) * x1;
  *y = x1;
  return gcd;
}
long long mpower(long long x, long long y, long long p) {
  long long res = 1;
  x = x % p;
  while (y > 0) {
    if (y & 1) {
      res = (res * x) % p;
    }
    y = y >> 1;
    x = (x * x) % p;
  }
  return res;
}
long long power(long long x, long long y) {
  long long res = 1;
  while (y > 0) {
    if (y & 1) res = res * x;
    y = y >> 1;
    x = x * x;
  }
  return res;
}