#include <fstream>
using namespace std;
#define dim 100005
#define inf 0x3f3f3f3f
int v[dim], best[dim], binar[dim],i,sol[dim];

int cautare(int nr, int ls, int ld)
{
	int mijloc;
	
		while(ls<=ld)
		{
			mijloc=(ls+ld)>>1;
			if(mijloc==ld || binar[mijloc]>=nr && binar[mijloc-1]<nr )
			{
					binar[mijloc]=min(binar[mijloc],nr);
					return mijloc;
			}
			else
				if(nr>binar[mijloc])
					ls=mijloc+1;
				else
					ld=mijloc-1;
		}
	
}

int main()
{
	ifstream fin("scmax.in");
	ofstream fout("scmax.out");
	int n, m,  j, sf=0,valmaxim=0,poz;
	
	fin>>n;
	
	for(i=1;i<=n;++i)
	{
		fin>>v[i];
		
		if(v[i]>binar[sf])
		{
			binar[++sf]=v[i];
			best[i]=sf;
		}
		else
			best[i]=cautare(v[i],1,sf);
		
		valmaxim=max(valmaxim,best[i]);
		
	}
	
	fout<<valmaxim <<'\n';
	long long nr=0,mare=(1LL<<34);
	
	for(i=n;i>=1;--i)
	{
		if(best[i]==valmaxim && v[i]<mare)
		{
			--valmaxim;
			mare=v[i];
			sol[++nr]=v[i];
		}
	}
	
	for(i=nr;i>=1;--i)
		fout<<sol[i] <<" ";
	
	return 0;
}