#include<bits/stdc++.h>
#include "puzzle.h"
#define Gc() getchar()
#define Me(x,y) memset(x,y,sizeof(x))
#define Mc(x,y) memcpy(x,y,sizeof(x))
#define d(x,y) ((m)*(x-1)+(y))
#define R(n) (rnd()%(n)+1)
#define Pc(x) putchar(x)
#define LB lower_bound
#define UB upper_bound
#define fi first
#define se second
#define eb emplace_back
#define all(x) x.begin(),x.end()
using namespace std;using ll=long long;using db=double;using lb=long db;using ui=unsigned;using ull=unsigned long long;using pii=pair<int,int>;
const int N=1e3+5,M=(1<<28)+5,K=1000+5,mod=1e9+7,Mod=mod-1;const db eps=1e-9;const int INF=1e9+7;mt19937 rnd(28382);
#define Tp template<typename T>
#define Ts template<typename T,typename... Ar>
namespace Debug{
	Tp void _debug(char* f,T t){cerr<<f<<'='<<t<<endl;}
	Ts void _debug(char* f,T x,Ar... y){while(*f!=',') cerr<<*f++;cerr<<'='<<x<<",";_debug(f+1,y...);}
	#ifdef LOCAL
	#define gdb(...) _debug((char*)#__VA_ARGS__,__VA_ARGS__)
	#else 
	#define gdb(...) void()
	#endif
}using namespace Debug;
int nn,pp[N],qcnt;
vector<int> p,vis,rgt;
int n;
void divide(vector<int> st,int sum,int w){
	if(!sum) return;
	if(st.size()==1){
		vis[st[0]]=1;rgt.push_back(st[0]);
		return;
	}
	int m=st.size()/2;
	vector<int> s1(st.begin(),st.begin()+m),s2(st.begin()+m,st.end());
	for(int i=0;i<s1.size();i++) swap(p[s1[i]],p[rgt[i]]);
	int pw=w-query(p)-s1.size();
	// gdb(pw);
	for(int i=0;i<s1.size();i++) swap(p[s1[i]],p[rgt[i]]);
	divide(s1,pw,w);divide(s2,sum-pw,w);
}
int alp[N][N];
void play(int nn){
	mt19937 rnd(181766);
	n=nn;p.resize(n);vis.resize(n);
	iota(all(p),0);
	if(n==1) return check(p);
	for(int i=1;i<=100;i++){
		shuffle(all(p),rnd);
		while(query(p)){
			shuffle(all(p),rnd);
		}
		for(int i=0;i<n;i++) alp[p[i]][i]=1;
	}
	int cnt=0;
	vector<int> id(n-1);
	iota(all(id),1);shuffle(all(id),rnd);
	for(int i:id){
		swap(p[0],p[i]);
		int w=query(p);
		if(w){
			if(w==2){
				cnt=w;vis[i]=vis[0]=1;
				break;
			}
			int w1=p[0],w2=p[i];
			while(1){
				auto q=p;
				shuffle(q.begin()+1,q.end(),rnd);
				if(!query(q)){vis[i]=1;break;}
				q=p;
				swap(q[0],q[i]);
				shuffle(q.begin()+1,q.end(),rnd);
				swap(q[0],q[i]);
				if(!query(q)){vis[0]=1;break;}
			}
			cnt=1;break;
			break;
		}
		swap(p[0],p[i]);
	}
	gdb(qcnt);
	for(int i=0;i<n;i++) if(vis[i]) rgt.push_back(i);
	int cts=0;
	while(cnt^n){
		int w=cnt;
		// gdb(w,p[0],p[1],p[2],p[3],p[4],rgt[0],vis[2]);
		while(w==cnt){
			for(int i=0;i<n;i++) if(!vis[i]) alp[p[i]][i]=1;
			static int ap[N];Me(ap,0);
			for(int i:rgt) ap[p[i]]=1;
			for(int i=0;i<n;i++) if(!vis[i]){
				int x=R(n)-1;
				int k=100;
				while(ap[x]||(k&&alp[x][i])){
					if(!ap[x]&&alp[x][i]) k--;
					x=R(n)-1;
				}
				p[i]=x;ap[x]=1;
			}
			int flag=0;
			for(int i=0;i<n;i++) if(!vis[i]&&!alp[p[i]][i]) flag=1;
			if(!flag) continue;
			w=query(p);
			cts++;
			// gdb(w,p[0],p[1],p[2],p[3],p[4]);
		}
		// gdb(w,p[0],p[1],p[2]);
		vector<int> st;
		vector<int> id(n+1);
		iota(all(id),0);shuffle(id.begin(),id.begin()+n,rnd);
		for(int i:id)if(rgt.size()<w){
			if(i<n&&!vis[i]&&!alp[p[i]][i]) st.push_back(i);
			if(i==n||st.size()==rgt.size()){
				if(i==n){
					divide(st,w-rgt.size(),w);
				}else{
					for(int i=0;i<st.size();i++) swap(p[st[i]],p[rgt[i]]);
					int pw=query(p);
					for(int i=0;i<st.size();i++) swap(p[st[i]],p[rgt[i]]);
					if(pw<w-st.size()){
						divide(st,w-pw-st.size(),w);
					}
				}
				
				st.clear();
			}
		}
		cnt=w;
	}
	check(p);
}