#include<fstream.h>
#include<math.h>
struct punct{double x,y,d;}p[120000],p0,s[120000];
int i,n,k,j,ps;
double pr;

inline void sch(punct &q,punct &w)
{
	punct aux;
	aux=q;q=w;w=aux;
}

void cauta_primul()
{
	int i,im;
	im=1;
	for (i=2;i<=n;i++)
		if (p[i].y<p[im].y) im=i;
			else if (p[i].y==p[im].y&&p[i].x<p[im].x) im=i;
	sch(p[1],p[im]);
}

inline double status(punct A,punct B,punct C)
{
	return A.x*B.y+B.x*C.y+C.x*A.y-B.y*C.x-C.y*A.x-A.y*B.x;
}

double dist(punct A, punct B)
{
	double u,v;
	u=A.x-B.x;
	v=A.y-B.y;
	return sqrt(u*u+v*v);
}

int main()
{
	ifstream f("infasuratoare.in");
	ofstream g("infasuratoare.out");
	f>>n;
	for (i=1;i<=n;++i) f>>p[i].x>>p[i].y;
	cauta_primul();p0=p[1];
	for (i=2;i<=n;i++)p[i].d=dist(p0,p[i]);
	do
	{
		k=0;
		for (i=2;i<n;++i)
		{
			pr=status(p0,p[i],p[i+1]);
			if (pr<0||pr==0&&p[i].d<p[i+1].d)
			{
				sch(p[i],p[i+1]);
				k=1;
			}
		}
	}while (k==1);
	i=2;s[1]=p[1];s[2]=p[2];
	for (j=3;j<=n;++j)
		if (status(p0,p[j-1],p[j])>0){++i;s[i]=p[j];}
	// pot lucra si cu p-ul ca stiva!!!
	for (j=1;j<=i;++j) p[j]=s[j];
	for (j=4;j<=n;++j) s[j]=s[0];
	n=i;ps=3;
	for (i=4;i<=n;++i)
	{
		do
		{ 
			pr=status(s[ps-1],s[ps],p[i]);
			if (pr<0) --ps;
		}while(pr<0);
		s[++ps]=p[i];
	}
	g<<ps<<"\n";
	for (i=1;i<=ps;++i)
		g<<s[i].x<<" "<<s[i].y<<"\n";
	f.close();
	g.close();
	return 0;
}