ll N,K,X[2d4],a[100],t,k;
{
	rd(N,K);
	rep(i,K){rd(X[i]);rd(t);}
	a[cin>>t,t-1]=(1..N);
	
	rep(i,N){
		t=a[i];
		t+=(t==X[0..K+k-1])-(t==X[0..]+1);
		X[K+k++]=(t..i);
		X[K+k++]=-(-t+1..~i);
	}

	wt(k);
	wt(X[K..K+k-1],X[K..]+1);
}