#include<fstream>
#include<iostream>
#include<vector>
#include<algorithm>
#include<iomanip>
#define DN 120005
#define x first
#define y second
using namespace std;
ifstream fin("infasuratoare.in");
ofstream fout("infasuratoare.out");
int n,st[DN],k,v[DN];
pair<long double,long double>x[DN];
long double det(int a,int b,int c)
{
    long double ce=x[a].x*x[b].y+x[b].x*x[c].y+x[c].x*x[a].y;
    long double d=x[b].y*x[c].x+x[c].y*x[a].x+x[a].y*x[b].x;
    return ce-d;
}
int main()
{
    fin>>n;
    for(int i=1;i<=n;i++)
        fin>>x[i].x>>x[i].y;
    sort(x+1,x+n+1);
    for(int i=1;i<=n;i++)
        cout<<x[i].x<<' '<<x[i].y<<'\n';
    k=2;
    st[1]=1;
    st[2]=2;
    v[2]=1;
    for(int i=3;i<=n;i++)
    {
        while(k>1&&det(st[k-1],st[k],i)<0)
        {
            v[st[k]]=0;
            k--;
        }
        k++;
        st[k]=i;
        v[i]=1;
    }
    for(int i=n-1;i>=1;i--)
        if(!v[i])
        {
            while(k>1&&det(st[k-1],st[k],i)<0)
            {
                v[st[k]]=0;
                k--;
            }
            k++;
            st[k]=i;
        }
    fout<<k-1<<'\n';
    for(int i=1;i<k;i++)
        fout<<fixed<<setprecision(15)<<x[st[i]].x<<' '<<x[st[i]].y<<'\n';
}