#include <iostream>
#include <fstream>
#include <vector>
#define mare 100000000
using namespace std;
ifstream fin("secv.in");
ofstream fout("secv.out");
int n,a[10000001],b[10000001],sir[1001],min1=mare,min2=mare,m;
int main()
{
    fin>>n;
    for(int i=1;i<=n;i++)
        fin>>a[i];
    b[1]=1;
    sir[1]=a[1];
    m=1;
    for(int i=1;i<=n;i++)
    {
        for(int j=0;j<=m+1;j++)
        {
            if(a[i]-sir[j]<=min1 && a[i]-sir[j]>=0)
            {
                min1=a[i]-sir[j];
                min2=j;
                cout<<min1<<"\n";
            }
            if(sir[min2]==0)
                m++;
                cout<<min2;
        }
        b[i]=min2;
    }
    for(int i=1;i<=m;i++)
    {
        for(int j=1;j<=n;j++)
            if(b[j]==i)
                fout<<a[j]<<" ";
            fout<<"\n";
    }
    return 0;
}