#include <bits/stdc++.h>
#define LL long long 
#define rep(i,n) for(int i=0;i<n;++i)
#define repn(i,n) for(int i=1;i<=n;++i)
using namespace std;
int qmi(int a, int k, int p)  // 快速幂模板
{
    int res = 1 % p;
    while (k)
    {
        if (k & 1) res = (LL)res * a % p;
        a = (LL)a * a % p;
        k >>= 1;
    }
    return res;
}

int C(int a, int b, int p)  // 通过定理求组合数C(a, b)
{
    if (a < b) return 0;

    LL x = 1, y = 1;  // x是分子，y是分母
    for (int i = a, j = 1; j <= b; i --, j ++ )
    {
        x = (LL)x * i % p;
        y = (LL) y * j % p;
    }

    return x * (LL)qmi(y, p - 2, p) % p;
}

int lucas(LL a, LL b, int p)
{
    if (a < p && b < p) return C(a, b, p);
    return (LL)C(a % p, b % p, p) * lucas(a / p, b / p, p) % p;
}
const int N = 1e6+10;
int b[N];
int main()
{
	int n; cin>>n;
	string s; cin>>s;
	for(int i=0;i<n;i++) b[i] = lucas(n-1,i,3);
	//for(int i=0;i<n;i++) cout<<b[i]<<' ';
	 //B 0 W 1 R 2
 
		if(n&1)
		{
			int ans = 0; 
			for(int i=0;i<=n;i++)
			{
				if(s[i]=='W') ans += 1 * b[i];
				if(s[i]=='R') ans += 2 * b[i];
			}
			ans %= 3;
			if(ans==2) cout<<"R"<<endl;
			else if(ans==1) cout<<"W"<<endl;
			else cout<<"B"<<endl;
		}else{
			int ans = 0; 
			for(int i=0;i<n;i++)
			{
				if(s[i]=='W') ans -= 1 * b[i];
				if(s[i]=='R') ans -= 2 * b[i];
			}
			ans %= 3;
			ans +=3 ;
			if(ans==2) cout<<"R"<<endl;
			else if(ans==1) cout<<"W"<<endl;
			else cout<<"B"<<endl;
		}
}
#include<iostream>
#include<unordered_map>
#include<cstring>
using namespace std;
const int N = 400010;
typedef long long ll;

int m, q;
ll n;

int pow10(ll n)
{
	ll res = 1%q;
	int i = -1;
	while(n >> ++i);
	--i;
	while(~i)
	{
		int j = n >> i & 1;
		res = (res * res) % q;
		if(j) res = (res * 10) % q;
		--i;
	}
	return res;
}

int main()
{
	cin >> n >> m;
	q = m * m;
	printf("%d", pow10(n) / m % m);
}
