#pragma GCC optimize("Ofast")
#pragma GCC target("avx2")

#define rd_peekc() ({if(rpos>=rend){usleep(10000);rpos=0;rend=read(0,rbuf,4096);}rbuf[rpos];})
#define rd_getc()  ({if(rpos>=rend){usleep(10000);rpos=0;rend=read(0,rbuf,4096);}rbuf[rpos++];})
#define rd() ({int _v=0,_c;while(_c=rd_getc()-48,_c>=0)_v=_v*10+_c;_v;})
#define wt(v) {unsigned _z=v,_n=0;long _d=0;while(++_n,_d=_d<<8|0x30|_z%10,_z/=10);*(long*)wp=_d;wp+=_n;}
#define rep(v,e) for(typeof(e)v=0;v<e;++v)
#define rrep(v,e) for(typeof(e)v=e;v--;)

char wbuf[1<<25];
char rbuf[4096];
int rpos,rend;
int a[5000];
int b[5000];

int main(){
	int n=rd();
	{
		char*wp=wbuf;
		rep(i,n){
			*wp++='1';
			*wp++=' ';
			wt(i+1);
			*wp++=' ';
			wt(i+1);
			*wp++='\n';
		}
		write(1,wbuf,wp-wbuf);
	}
	rep(i,n){
		if(rd_peekc()=='-'){
			rd_getc();
			rd_getc();
			rd_getc();
			a[i]=-1;
		}else{
			a[i]=rd()-1;
		}
	}
	int x=({
		int x=0;
		int b=0;
		rep(i,n){
			int j=i;
			int c=0;
			while(j=a[j],j>=0){
				++c;
			}
			if(c>=b){
				b=c;
				x=i;
			}
		}
		x;
	});
	{
		char*wp=wbuf;
		rep(i,n){
			*wp++='1';
			*wp++=' ';
			wt(x+1);
			*wp++=' ';
			wt(i+1);
			*wp++='\n';
		}
		write(1,wbuf,wp-wbuf);
	}
	int y=0;
	rep(i,n){
		if(rd_peekc()=='-'){
			rd_getc();
			rd_getc();
			rd_getc();
			y=i;
		}else{
			a[rd()-1]=i;
		}
	}
	rrep(i,n){
		b[y]=i;
		y=a[y];
	}
	{
		char*wp=wbuf;
		*wp++='2';
		rep(i,n){
			*wp++=' ';
			wt(b[i]+1);
		}
		*wp++='\n';
		write(1,wbuf,wp-wbuf);
	}
	_exit(0);
}