#if !__INCLUDE_LEVEL__

#include __FILE__
ll Euclid2d(ll x1,ll x2,ll y1,ll y2){
    return (x1-x2)*(x1-x2)+(y1-y2)*(y1-y2);
};
int main()
{
    int N,M;cin >> N >> M;
    vector Planet(N,vector<int>(2));
    rep(i,N){
        cin >> Planet[i][0] >> Planet[i][1];
    }
    vector<int> Cluster(N);

    random_device seed_gen;
    mt19937_64 rnd(seed_gen());
    uniform_int_distribution<int> Clu_N(0, M-1);

    vector Center(M,vector<int>(2));
    rep(i,N){
        Cluster[i]=Clu_N(rnd);
    }
    rep(k,1000){
        vector<int> ClusterNum(M,0);
        vector tmp_center(M,vector<int>(2));
        rep(i,N){
            tmp_center[Cluster[i]][0] += Planet[i][0];
            tmp_center[Cluster[i]][1] += Planet[i][1];
            ClusterNum[Cluster[i]]+=1;
        }
        rep(m,M){
            if(ClusterNum[m]==0)continue;
            tmp_center[m][0]/=ClusterNum[m];
            tmp_center[m][1]/=ClusterNum[m];
        }
        bool change = false;
        rep(i,N){
            int c = Cluster[i];
            ll D = Euclid2d(Planet[i][0],tmp_center[c][0],Planet[i][1],tmp_center[c][1]);
            rep(m,M){
                ll dist = Euclid2d(Planet[i][0],tmp_center[m][0],Planet[i][1],tmp_center[m][1]);
                if(dist<D){
                    D = dist;
                    c = m;
                    change = true;
                }
            }
            Cluster[i] = c;
        }
        if(!change){
            Center = tmp_center;
        }
    }

    rep(m,M){
        cout << Center[m][0] << " " << Center[m][1] << endl;
    }
    vector<pair<int,int>> Out;
    int start = 0;
    vector Cplanet(8,vector<int>(0));
    rep(i,N){
        Cplanet[Cluster[i]].emplace_back(i);
        if(i==0)start = Cluster[i];
    }
    Out.emplace_back(1,1);
    Out.emplace_back(2,start+1);
    rep(m,M){
        int station = (m+start)%M;
        if(station==start){
            range(j,1,Cplanet[station].size()){
                Out.emplace_back(1,Cplanet[station][j]+1);
                Out.emplace_back(2,station+1);
            }
        }
        else{
            rep(j,Cplanet[station].size()){
                Out.emplace_back(1,Cplanet[station][j]+1);
                Out.emplace_back(2,station+1);
            }
        }
        Out.emplace_back(2,(station+1)%M+1);
    }
    Out.emplace_back(1,1);
    ll V = Out.size();
    cout << V << "\n";
    rep(v,V){
        cout << Out[v].first <<" " << Out[v].second << "\n";
    }
}

#else
//tie(a, b, c) = t
//repをllにしているので時間ギリギリならintに変換
#include <bits/stdc++.h>
#include <atcoder/all>
using namespace std;
using namespace atcoder;
#define rep(i, n) for(long long int i = 0; i < n; i++)
#define rrep(i, n) for(long long int i = n-1; i >= 0; i--)
#define range(i, m, n) for(long long int i = m; i < n; i++)
#define fore(i,a) for(auto &i:a)
#define all(v) v.begin(), v.end()
#define rall(v) v.rbegin(), v.rend()
#define Sum(v) accumulate(all(v),0LL)
#define minv(v) *min_element(all(v))
#define maxv(v) *max_element(all(v))
typedef long long ll;
typedef vector<ll> vl;
typedef vector<vector<ll>> vvl;
const ll INF = 1e16;
const ll MOD1 = 1000000007;
const ll MOD2 = 998244353;
template<class T> inline bool chmax(T& a, T b) { if (a < b) { a = b; return 1; } return 0; }
template<class T> inline bool chmin(T& a, T b) { if (a > b) { a = b; return 1; } return 0; }
ll SN(char s){return ll(s-'0');}
ll SN(string s){return stoll(s);}
int alpN(char s){return int(s-'a');}
int AlpN(char s){return int(s-'A');}
int Nalp(int n){return char(n+97);}
int NAlp(int n){return char(n+65);}
using Graph = vector<vector<ll>>;
using GraphCost = vector<vector<pair<ll,ll>>>;
using mint = modint;
using mint1 = modint1000000007;
using mint2 = modint998244353;
using pll = pair<long long, long long>;
template <class T>ostream &operator<<(ostream &o,const vector<T>&v){for(int i=0;i<(int)v.size();i++)o<<(i>0?" ":"")<<v[i];return o;}//vector空白区切り出力
ostream& operator<<(ostream& os, const mint1& N) {return os << N.val();}//mint出力。デフォはmint1
ostream& operator<<(ostream& os, const mint2& N) {return os << N.val();}
template<class T> bool contain(const std::string& s, const T& v) {
    return s.find(v) != std::string::npos;
}
ll max(int x,ll y){return max((ll)x,y);}
ll max(ll x,int y){return max(x,(ll)y);}
ll min(int x,ll y){return min((ll)x,y);}
ll min(ll x,int y){return min(x,(ll)y);}
template <typename T>
struct edge {
    int src, to;
    T cost;
    edge(int to, T cost) : src(-1), to(to), cost(cost) {}
    edge(int src, int to, T cost) : src(src), to(to), cost(cost) {}
    edge& operator=(const int& x) {
        to = x;
        return *this;
    }
    operator int() const { return to; }
};

template <typename T>
using Edges = vector<edge<T> >;
template <typename T>
using WeightedGraph = vector<Edges<T> >;
using UnWeightedGraph = vector<vector<int> >;
template <typename T>
using Matrix = vector<vector<T> >;

//unorderd_mapの拡張…https://qiita.com/hamamu/items/4d081751b69aa3bb3557
template<class T> size_t HashCombine(const size_t seed,const T &v){
    return seed^(std::hash<T>()(v)+0x9e3779b9+(seed<<6)+(seed>>2));
}
/* pair用 */
template<class T,class S> struct std::hash<std::pair<T,S>>{
    size_t operator()(const std::pair<T,S> &keyval) const noexcept {
        return HashCombine(std::hash<T>()(keyval.first), keyval.second);
    }
};
/* vector用 */
template<class T> struct std::hash<std::vector<T>>{
    size_t operator()(const std::vector<T> &keyval) const noexcept {
        size_t s=0;
        for (auto&& v: keyval) s=HashCombine(s,v);
        return s;
    }
};
/* tuple用 */
template<int N> struct HashTupleCore{
    template<class Tuple> size_t operator()(const Tuple &keyval) const noexcept{
        size_t s=HashTupleCore<N-1>()(keyval);
        return HashCombine(s,std::get<N-1>(keyval));
    }
};
template <> struct HashTupleCore<0>{
    template<class Tuple> size_t operator()(const Tuple &keyval) const noexcept{ return 0; }
};
template<class... Args> struct std::hash<std::tuple<Args...>>{
    size_t operator()(const tuple<Args...> &keyval) const noexcept {
        return HashTupleCore<tuple_size<tuple<Args...>>::value>()(keyval);
    }
};
ll ceil(ll a, ll b){
  return (a + b - 1) / b;
}
#endif