#include <algorithm>
#include <cmath>
#include <fstream>

using namespace std;

const int maxn = 120000;
const int INF = 1000000000;

double x[maxn], y[maxn];
int pInitial, IND[maxn], n, ST[maxn], p, l;

bool cmp(int i, int j) { return (x[i] - x[pInitial]) * (y[j] - y[pInitial]) > (x[j] - x[pInitial]) * (y[i] - y[pInitial]); }

// bool cmp(int i, int j) { return atan2(y[i], x[i]) < atan2(y[j], x[j]); }

/*

(y[i] - y[pInitial]) / (x[i] - x[pInitial])   <   (y[j] - y[pInitial]) / (x[j] - x[pInitial])

*/

double semn(int i1, int i2, int i3) {
    return x[i1] * y[i2] + x[i2] * y[i3] + x[i3] * y[i1] - y[i1] * x[i2] - y[i2] * x[i3] - y[i3] * x[i1];
}

int main() {
    ifstream fin("infasuratoare.in");
    ofstream fout("infasuratoare.out");

    fin >> n;
    x[0] = INF;
    y[0] = INF;
    pInitial = 0;
    for (int i = 1; i <= n; i++) {
        fin >> x[i] >> y[i];
        if (y[i] < y[pInitial])
            pInitial = i;
        else //
            if (y[i] == y[pInitial])
                if (x[i] < x[pInitial])
                    pInitial = i;
    }
    for (int i = 1; i <= n; i++)
        if (i != pInitial)
            IND[++l] = i;
    sort(IND + 1, IND + n, cmp);
    p = 1;
    ST[p] = pInitial;
    for (int i = 1; i <= n - 1; ++i) {
        while (p >= 2 and semn(ST[p - 1], ST[p], IND[i]) < 0)
            --p;
        ST[++p] = IND[i];
    }
    fout << p;
    for (int i = 1; i <= p; ++i)
        fout << x[ST[i]] << ' ' << y[ST[i]];
    return 0;
}