#include <bits/stdc++.h>
#include <boost/multiprecision/cpp_int.hpp>

/***** type *****/
using namespace std;
using ll = long long;
using ld = long double;
template <class T> using vt = vector<T>;
template <class T> using vvt = vector<vector<T>>;
template <class T> using vvvt = vector<vector<vector<T>>>;
using ml = boost::multiprecision::cpp_int;

/***** define *****/
#define all(c) (c).begin(), (c).end()            // begin to end
#define rep(i, b, e) for (ll i = b; i < e; i++)  // repeat
#define repr(i, b, e) for (ll i = b; e < i; i--) // repeat reverse
#define val(itr) *(itr)                          // get value
/***** const value *****/
#define llong_max 9223372036854775807            // 9 * 10^18
#define ldbl_max 1.79769e+308                    // 1.7 * 10^308
#define pi 3.14159265358979323846                // 3.14 ...
/***** for each macro *****/
#define fori(i, ...) if(ll i = -1) for(__VA_ARGS__) if(i++, true)
#define each(i, e, c) fori(i, auto e = c.begin(); e != c.end(); ++e)
#define forir(i, v, ...) if(ll i=(ll)v.size())for(__VA_ARGS__)if(i--,true)
#define eachr(i, e, c) forir(i, auto e = c.rbegin(); e != c.rend(); ++e)

/***** lambda *****/
auto Count = [] // long long count value
(auto b, auto e, auto x) { return (ll)count(b, e, x); };
auto CtoN = [] // char to number
(auto c) { return (ll)(c - '0'); };
auto DivC = [] // long double div ceiling
(auto a, auto b) { return ceil((ld)a / (ld)b); };
auto Fix = [] // fix value
(auto b, auto e, auto fix)
{ for (auto it = b; it != e; ++it)*it += fix; };
auto Pow = [] // long long pow
(auto a, auto b) { return (ll)pow(a, b); };
auto Pow2 = [] // long long pow2
(auto n) { return (1LL << n); };
auto Pow10 = [] // long long pow10
(auto n) { return (ll)pow(10, n); };
auto Size = []  // long long collection size
(auto& c) { return (ll)(c).size(); };
auto Sum = [] // long long accumulate
(auto b, auto e) { return accumulate(b, e, 0LL); };

/***** template *****/
template <class T> vvt<T> VVT
(ll ys, ll xs, T fill = T())
{	// vector<vector<T>> resize + fill
	vvt<T> v(ys);
	each(i, y, v) { y->resize(xs, fill); } return v;
}
template <class T> vvvt<T> VVVT
(ll zs, ll ys, ll xs, T fill = T())
{	// vector<vector<vector<T>>> resize + fill
	vvvt<T> v(zs);
	each(i, z, v) { val(z) = VVT(ys, xs, fill); } return v;
}
template <class T> vt<T> InputVT
(ll size, T fix = T())
{	// input vector<T> (T != struct) + fix
	vt<T> v(size);
	each(i, e, v) { cin >> val(e); val(e) += fix; } return v;
}
template <class T> vvt<T> InputVVT
(ll ys, ll xs, T fix = T())
{	// input vector<vector<T>> (T != struct) + fix
	vvt<T> v(ys); each(i, y, v) y->resize(xs);
	rep(y, 0, ys) rep(x, 0, xs) { cin >> v[y][x]; v[y][x] += fix; }
	return v;
}
template <class T> vvvt<T> InputVVVT
(ll zs, ll ys, ll xs, T fix = T())
{	// input vector<vector<vector<T>>> (T != struct) + fix
	vvvt<T> v(zs);
	each(i, z, v) { val(z) = InputVVT<T>(ys, xs, fix); }
	return v;
}

namespace NyaGadget
{
	/*** Bit操作ライブラリ ***/

	struct NyaBit
	{

		/**
		@brief 任意桁でビットが1になっている数を返す関数
		@note
		 結果はNyaBit::Test()と同じ。
		**/
		static long long Count(long long x, long long i)
		{
			return Test(x, i);
		}

		/**
		@brief 任意桁でビットが1になっている数を返す関数
		@note
		 結果はBit::Test()と同じ。
		 flipがtrueならビットが0になっている数を返す。
		**/
		static long long Count(long long x, long long i, bool flip)
		{
			return Test(x, i, flip);
		}

		/**
		@brief コンテナ各要素の任意桁でビットが1になっている数を返す関数
		@note
		 コンテナ半開区間[b, e)で各要素i桁目ビットが1になっている数を返す。
		 sumは初期値で通常デフォルト引数のままで良い。
		**/
		template <class T> static long long EachCount(T b, T e, long long i, long long sum = 0)
		{
			for (auto it = b; it != e; ++it) sum += Test(*it, i);
			return sum;
		}

		/**
		@brief コンテナ各要素の任意桁でビットが1になっている数を返す関数
		@note
		 コンテナ半開区間[b, e)で各要素i桁目ビットが1になっている数を返す。
		 flipをtrueにするとビットが0になっている数を返す。
		 sumは初期値で通常デフォルト引数のままで良い。
		**/
		template <class T> static long long EachCount(T b, T e, long long i, bool flip, long long sum = 0)
		{
			for (auto it = b; it != e; ++it) sum += Test(*it, i, flip);
			return sum;
		}

		/**
		@brief 任意範囲でビットが1になっている数を返す関数
		@note
		 値xの半開区間[b, e)でビットが1になっている数を返す。
		 flipをtrueにするとビットが0になっている数を返す。
		 **/
		static long long RangeCount(long long x, long long b, long long e, long long sum = 0)
		{
			for (auto i = b; i < e; i++) sum += Test(x, i);
			return sum;
		}

		/**
		@brief 任意範囲でビットが1になっている数を返す関数
		@note
		 値xの半開区間[b, e)でビットが1になっている数を返す。
		 flipをtrueにするとビットが0になっている数を返す。
		 **/
		static long long RangeCount(long long x, long long b, long long e, bool flip, long long sum = 0)
		{
			for (auto i = b; i < e; i++) sum += Test(x, i);
			return sum;
		}

		/**
		@brief ビットシフトした結果を返す関数
		@note
		 値xをnビット左シフトした結果を10進数で返す。
		**/
		static long long Shift(long long x, long long n)
		{
			return (x << n);
		}

		/**
		@brief サイズを返す関数
		@note
		 値xのサイズを返す。
		**/
		static long long Size(long long x, long long size = 0)
		{
			while ((long long)pow(2, size) <= x) size++;
			return size;
		}

		/**
		@brief 任意桁のビットを返す関数
		@note
		 値xのi桁目ビットを返す。
		**/
		static long long Test(long long x, long long i)
		{
			return ((x & Shift(1, i)) != 0) ? 1 : 0;
		}

		/**
		@brief 任意桁のビットを返す関数
		@note
		 値xのi桁目ビットを返す。
		 flipがtrueなら反転したビットを返す。
		**/
		static long long Test(long long x, long long i, bool flip)
		{
			if (flip)
				return ((x & Shift(1, i)) != 0) ? 0 : 1;
			else
				return ((x & Shift(1, i)) != 0) ? 1 : 0;
		}

		/**
		@brief 任意桁のビットを10進数に変換して返す
		@note
		 値xのi桁目ビットを10進数に変換して返す。
		**/
		static long long To10(long long x, long long i)
		{
			return Test(x, i) * (long long)pow(2, i);
		}
	};
}

using namespace NyaGadget;

struct Edge
{
	ll cost;
	ll from;
	ll to;
};

int main()
{
	ll L; cin >> L;

	vt<Edge> ans;
	rep(i, 0, NyaBit::Size(L)-1)
	{
		ans.push_back({ 0, i, i + 1 });
		ans.push_back({ Pow2(i), i, i + 1 });
	}

	ll test = Pow2(NyaBit::Size(L)-1);
	repr(i, NyaBit::Size(L)-2, -1)
	{
		if (NyaBit::Test(L, i) == 1)
		{
			ans.push_back({ test, i, NyaBit::Size(L)-1 });
			test += Pow2(i);
		}
	}

	cout << NyaBit::Size(L) << " " << Size(ans) << endl;
	each(i, e, ans) cout << e->from + 1 << " " << e->to + 1 << " " << e->cost << endl;
	return 0;
}


Measured memory_bytes: 512