#include<bits/stdc++.h>
#define N 50010
using namespace std;
int n,cnt,Cnt[2],head[N<<1],fa[N<<1],To[N<<2],Val[N<<2],Nxt[N<<2];
void add(int from,int to,int val){
    To[++cnt]=to;
    Nxt[cnt]=head[from];
    Val[cnt]=val;
    head[from]=cnt;
    Cnt[val]++;
}
int find(int x){return fa[x]==x?x:fa[x]=find(fa[x]);}
void Merge(int x,int y){x=find(x),y=find(y);if(x^y)fa[x]=y;}
bool Query(int u,int v){
    if(u>v)swap(u,v);
    printf("? %d %d\n",u,v);
    fflush(stdout);
    fflush(stdin);
    char c=getchar();
    while(c^'R'&&c^'B')c=getchar();
    return c=='R';
}
void Print(int now,int fa,int col){
    if(fa)printf("%d %d\n",now,fa);
    for(int i=head[now];i;i=Nxt[i])
        if(To[i]^fa&&col==Val[i])
            Print(To[i],now,col);
}
int main(){
    scanf("%d",&n);
    for(int i=1;i<=n<<1;i++)
        fa[i]=i;
    for(int i=2;i<=n;i++)
        if(!Query(1,i)){
            add(1,i,0);
            add(i,1,0);
            Merge(1,i);
        }
        else{
            add(1,i,1);
            add(i,1,1);
            Merge(n+1,n+i);
        }
    int l=2,r=n+2;
    while(max(Cnt[0],Cnt[1])<(n-1)<<1){
    	while(find(l)==find(1))l++;
    	while(find(r)==find(n+1))r++;
    	if(!Query(l,r-n))Merge(l,r-n),add(l,r-n,0),add(r-n,l,0);
    	else Merge(l+n,r),add(l,r-n,1),add(r-n,l,1);
	}
    printf("!\n");
    bool Flag=true;
    for(int i=2;i<=n;i++)
        if(find(i)^find(1)){
            Flag=false;
            break;
        }
    if(Flag)return Print(1,0,0),0;
    Flag=true;
    for(int i=2;i<=n;i++)
        if(find(i+n)^find(1+n)){
            Flag=false;
            break;
        }
    if(Flag)return Print(1,0,1),0;
}