#include<bits/stdc++.h>
using namespace std;
#define ll long long
namespace IO{//by cyffff
	int len=0;
	char ibuf[(1<<21)+1],*iS,*iT,out[(1<<25)+1];
	#if ONLINE_JUDGE
	#define gh() (iS==iT?iT=(iS=ibuf)+fread(ibuf,1,(1<<21)+1,stdin),(iS==iT?EOF:*iS++):*iS++)
 	#else
	#define gh() getchar()
	#endif
	#define reg register
	inline int read(){
		reg char ch=gh();
		reg int x=0;
		reg char t=0;
		while(ch<'0'||ch>'9')   t|=ch=='-',ch=gh();
		while(ch>='0'&&ch<='9') x=x*10+(ch^48),ch=gh();
		return t?-x:x;
	}
	inline void putc(char ch){
		out[len++]=ch;
	}
	template<class T>
	inline void write(T x){
		if(x<0)putc('-'),x=-x;
		if(x>9)write(x/10);
		out[len++]=x%10+48;
	}
	inline void flush(){
		fwrite(out,1,len,stdout);
		len=0;
	}
	inline char getc(){
		char ch=gh();
		while(ch<'A'||ch>'Z') ch=gh();
		return ch;
	}
}
using IO::read;
using IO::write;
using IO::flush;
using IO::getc;
using IO::putc;
const int N=6e5+10;
int n,pr[N];
int stk[7][N],tp[7];
/*
0 A
1 C
2 AB
3 BC
4 ACB=CAB
5 ABCB=CBAB
6 ABC=CBA
*/
inline void push(int x,int i){
	stk[x][++tp[x]]=i;
}
int main(){
//	freopen("triples.in","r",stdin);
//	freopen("triples.out","w",stdout);
	n=read();
	for(int i=1;i<=n;i++){
		int v=read();
		if(v==1){
			if(tp[3]){
//				puts("1 3 6");
				int p=stk[3][tp[3]--];
				pr[pr[p]]=i;
				push(6,p);
			}else if(tp[4]){
//				puts("1 4 0 6");
				int p=stk[4][tp[4]--];
				push(0,pr[pr[p]]);
				int q=pr[p];
				pr[q]=p,pr[p]=i;
				push(6,q);
			}else if(tp[5]){
//				puts("1 5 2 6");
				int p=stk[5][tp[5]--];
				if(pr[pr[p]]>pr[p]){
					int q=pr[p];
					pr[p]=pr[pr[pr[p]]];
					push(2,p);
					pr[pr[q]]=i;
					push(6,q);
				}else{
					push(2,pr[pr[p]]);
					int q=pr[p];
					pr[q]=p,pr[p]=i;
					push(6,q);
				}
			}else{
//				puts("1 0");
				push(0,i);
			}
		}else if(v==3){
			if(tp[2]){
//				puts("3 2 6");
				int p=stk[2][tp[2]--];
				pr[i]=p;
				push(6,i);
			}else if(tp[4]){
//				puts("3 4 1 6");
				int p=stk[4][tp[4]--];
				push(1,pr[p]);
				pr[p]=pr[pr[p]],pr[i]=p;
				push(6,i);
			}else if(tp[5]){
//				puts("3 5 3 6");
				int p=stk[5][tp[5]--];
				if(pr[pr[p]]<pr[p]){
					int q=pr[p];
					pr[i]=pr[pr[p]];
					push(6,i);
					pr[q]=p;
					push(3,q);
				}else{
					push(3,pr[p]);
					pr[p]=pr[pr[pr[p]]],pr[i]=p;
					push(6,i);
				}
			}else{
//				puts("3 1");
				push(1,i);
			}
		}else{
			if(tp[0]&&tp[1]){
//				puts("2 0 1 4");
				int p=stk[0][tp[0]--],q=stk[1][tp[1]--];
				pr[q]=p,pr[i]=q;
				push(4,i);
			}else if(tp[0]){
//				puts("2 0 2");
				int p=stk[0][tp[0]--];
				pr[i]=p;
				push(2,i);
			}else if(tp[1]){
//				puts("2 1 3");
				int p=stk[1][tp[1]--];
				pr[p]=i;
				push(3,p);
			}else if(tp[4]){
				int p=stk[4][tp[4]--];
				pr[i]=pr[pr[p]];
				push(2,i);
				int q=pr[p];
				pr[q]=p;
				push(3,q);
			}else if(tp[6]){
//				puts("2 6 5");
				int p=stk[6][tp[6]--];
				pr[i]=p;
				push(5,i);
			}
		}
	}
	write(tp[5]+tp[6]),putc('\n');
	for(int p=1;p<=tp[5];p++){
		int i=pr[stk[5][p]],j=pr[i],k=pr[j];
		if(i>k) swap(i,k);
		write(i-1),putc(' '),write(j-1),putc(' '),write(k-1),putc('\n');
	}
	for(int p=1;p<=tp[6];p++){
		int i=stk[6][p],j=pr[i],k=pr[j];
		if(i>k) swap(i,k);
		write(i-1),putc(' '),write(j-1),putc(' '),write(k-1),putc('\n');
	}
	flush();
}