#include<iostream>
#include<cstdio>
#include<cmath>
#include<vector>
#include<set>
#define N 600000
using namespace std;
int read()
{
	char c=0;
	int sum=0;
	while (c<'0'||c>'9') c=getchar();
	while ('0'<=c&&c<='9') sum=sum*10+c-'0',c=getchar();
	return sum;
}
struct reads
{
	int a,b,c;
};
reads tong[N+1];
int n,q,rt,length,leng,depth[N+1],fa[N+1],ds[N+1],L[N+1];
vector<int>E[N+1];
set<int>s[N+1];
bool used[N+1];
int build(int l,int r)
{
	int nw=++leng;
	if (r-l+1==1)
	{
		E[nw].push_back(l);
		return nw;
	}
	if (r-l+1==2)
	{
		E[nw].push_back(l),E[nw].push_back(l+1);
		return nw;
	}
	if (r-l+1==3)
	{
		tong[++length]=(reads){l,l+1,l+2},E[nw].push_back(l),E[nw].push_back(l+1),E[nw].push_back(l+2);
		return nw;
	}
	int d=sqrt(r-l+1),pv=-1;
	ds[nw]=d,L[nw]=l;
	for (int i=l;i<=r;++i)
	{
		if ((i-l)%d==0)
		{
			E[nw].push_back(i);
			if (pv!=-1&&pv+1<=i-1)
			{
				for (int j=i-2;j>=pv+1;--j) tong[++length]=(reads){j,j+1,i};
				E[nw].push_back(build(pv+1,i-1));
			}
			pv=i;
		}
		else
		{
			if (pv!=-1&&i-pv>1) tong[++length]=(reads){pv,i-1,i};
		}
	}
	if (pv+1<=r) E[nw].push_back(build(pv+1,r));
	for (int i=l+(r-l)/d*d;i>=l;i-=d)
		for (int j=i+d;j<=r;j+=d)
		{
			if (i+d==j) tong[++length]=(reads){i,i+1,j};
			else tong[++length]=(reads){i,i+d,j};
		}
	return nw;
}
void dfs(int x)
{
	for (int i=0;i<E[x].size();++i) fa[E[x][i]]=x,depth[E[x][i]]=depth[x]+1,dfs(E[x][i]);
	return;
}
int lca(int x,int y)
{
	while (x!=y)
	{
		if (depth[x]<depth[y]) swap(x,y);
		x=fa[x];
	}
	return x;
}
int main()
{
	int l,r,sl,nw,nw2;
	cin>>n,leng=n,rt=build(0,n),cout<<length<<endl;
	for (int i=1;i<=length;++i) cout<<tong[i].a<<' '<<tong[i].b<<' '<<tong[i].c<<endl,s[tong[i].a].insert(tong[i].c);
	for (int i=0;i<=n-1;++i) s[i].insert(i+1);
	fflush(stdout),cin>>q,depth[rt]=1,dfs(rt);
	while (q--)
	{
		cin>>l>>r,sl=lca(l,r);
		if (s[l].find(r)!=s[l].end()) cout<<l<<' '<<r<<endl;
		else
		{
			nw=L[sl]+(l-L[sl])/ds[sl]*ds[sl]+ds[sl],nw2=L[sl]+(r-1-L[sl])/ds[sl]*ds[sl];
			if (nw==nw2) cout<<l<<' '<<nw<<' '<<r<<endl;
			else cout<<l<<' '<<nw<<' '<<nw2<<' '<<r<<endl;
		}
		fflush(stdout);
	}
	return 0;
}