#include <bits/stdc++.h>
using namespace std;
#define int long long
#define mp make_pair
#define inf 1e9
#define pii pair <int, int>
const int mod = 1e9 + 7;
inline int read () {
	int x = 0, f = 1;
	char ch = getchar ();
	while (ch < '0' || ch > '9') f = ((ch == '-') ? -1 : f), ch = getchar ();
	while (ch >= '0' && ch <= '9') x = x * 10 + ch - '0', ch = getchar ();
	return x * f;
}
inline void write (int x) {
	if (x < 0) x = -x, putchar ('-');
	if (x >= 10) write (x / 10);
	putchar (x % 10 + '0');
}
int n;
char ch[1000005];
int tot;
vector <pii> Ans, a;
int f[1000005][3], pre[1000005][3];
void print0(int fr, int x) {
	if(x & 1) Ans.push_back(mp(fr, 3)), x -= 3;
	while(x >= 2) Ans.push_back(mp(fr, 2)), x -= 2;
}
void print1(vector <pii> bas) {
	int mid = (int)bas.size() / 2, rk = 0;
	for(int i = 0; i < mid; i++) rk += bas[i].second;
	print0(rk + 1, bas[mid].second);
	for(int i = 1; i <= mid; i++) {
		rk -= bas[mid-i].second;
		print0(rk + 1, bas[mid-i].second + bas[mid+i].second);
	}
}
void print2(vector <pii> bas) {
	assert(0);
}
signed main () {
//	freopen (".in", "r", stdin);
//	freopen (".out", "w", stdout);
	n = read();
	scanf("%s", ch + 1);
	a.push_back(mp((ch[1] == 'A') ? 0 : 1, 1));
	for(int i = 2; i <= n; i++) {
		if(ch[i] != ch[i-1]) a.push_back(mp((ch[i] == 'A') ? 0 : 1, 1));
		else a.back().second++;
	}
	tot = (int)a.size();
	if(tot & 1) {
		if(a[tot/2].second >= 2) print1(a);
		else {
			int mx = 0, s = 0;
			for(auto x : a) {
				if(x.second < 2) s++;
				else s = 0;
				mx = max(mx, s);
			}
			if(mx < tot / 2) print2(a);
			else return printf("-1\n") & 0;
		}
	}
	else {
		
	}
	write((int)Ans.size()), putchar('\n');
	for(auto x : Ans) write(x.first), putchar(' '), write(x.second), putchar('\n');
	return 0;
}
/*
10
BBABBAABAB
*/