#include <cstdio>
#include <queue>
#include <vector>
#include <set>
using namespace std;

const int NN = 100001;
int a[NN], d, u[] = {-1,-1,1,1}, v[] = {1,-1,1,-1};
set< pair<int,int> > s;
queue< pair<int,int> > q;

inline int aps( int x ) { if( x > 0 ) return x; return -x; }
inline bool ok( int x, int y ) { return aps(a[x]-a[y]) <= d; }

int main () {

	int n; scanf("%d%d", &n, &d);
	for(int i=0; i<n; i++) { scanf("%d", a+i); q.push( make_pair(i,i) ); }
	for(int i=0; i<n-1; i++) if( ok(i,i+1) ) { s.insert( make_pair(i,i+1) ); q.push( make_pair(i,i+1) ); }
	while( !q.empty() ) {
		int x = q.front().first;
		int y = q.front().second;
		q.pop();
		for(int i=0; i<4; i++) {
			int nx = u[i] + x;
			int ny = v[i] + y;
			if( nx < 0 || ny < 0 || nx >= n || ny >= n || !ok(nx,ny) || nx >= ny || s.find( make_pair(nx,ny) ) != s.end() ) continue;
			s.insert( make_pair(nx,ny) );
			q.push( make_pair(nx,ny) );
		}
	}
//	cout << s.size() << endl;
	for( set< pair<int,int> >::iterator it = s.begin(); it != s.end(); ++it) printf("%d %d\n", 1+(*it).first, 1+(*it).second );

return 0; }