BZOJ2214: [Poi2011]Shift

题目大意：

有一个1..n的排列，有两种操作：
(a) 将最后一个数移到最前面
(b) 把第三个数移到最前面
我们将连续进行k次同一个操作称为“一块操作”，表示为ka或kb。
找到一个操作序列使得进行这些操作后，排列变为1,2,3,...,n。

什么狗题！网上就搜到了一个一句话题解差评！！

大概思想就是按顺序一个一个的确定位置，假设前i-1个位置都已经确定好了，现在要把第i号放在他们后面，我们可以先把i弄到最前面，然后只要i-1不在最后两个，那就一直a两下b一下，这样就能保持i在最上面。当i-1到了最后一个位置时，那就说明已经放好了，否则就a一下b两下。

当还剩最后两个空时，需要特判一下，n为偶数无论怎样都有解，n为奇数时假设最后两个不是有序的就无解

最后是输出，超级烦，需要注意数字不能小于1不能大于等于n，相邻两块必须操作不同

#include<iostream>
#include<cstdio>
#include<cstring>
#include<algorithm>
#define N 2010
using namespace std;
int a[N];
int sit[N],PY;
int ans[N*N*2],cnt;
char K[N*N*2];
int n;
void NO(){puts("NIE DA SIE");exit(0);}
int cal(int x,int c)
{
	c%=n;
	if(x+c<=n&&x+c>0) return x+c;
	if(x+c<=0) return x+c+n;
	return x+c-n;
}
int now(int x)
{
	return cal(sit[x],PY);
}
void A(int x)
{
	cnt++;
	ans[cnt]=x;
	K[cnt]='a';
	PY+=x;
}
void B(int x)
{
	cnt++;
	ans[cnt]=x;
	K[cnt]='b';
	int p1,p2,p3;
	p1=cal(1,-PY);
	p2=cal(2,-PY);
	p3=cal(3,-PY);
	if(x==1)
	{
		int tmp=a[p1];
		a[p1]=a[p3];
		a[p3]=a[p2];
		a[p2]=tmp;
	}
	else if(x==2)
	{
		int tmp=a[p1];
		a[p1]=a[p2];
		a[p2]=a[p3];
		a[p3]=tmp;
	}
	sit[a[p1]]=p1;
	sit[a[p2]]=p2;
	sit[a[p3]]=p3;
}
void doit()
{
	while(cal(sit[n-1],1)!=sit[n])
	{
		if(now(n-1)!=1)
		A(n+1-now(n-1));
		B(2);
	}
}
void final()
{
	if(now(1)!=1)
	A(n+1-now(1));
}
int cans[N*N],ccnt;
char cK[N*N];
void output()
{
	int i,j;
	for(i=1;i<=cnt;i++)
	{
		if(K[i]==cK[ccnt]) cans[ccnt]+=ans[i];
		else
		{
			if(cK[ccnt]=='a')
			{
				cans[ccnt]%=n;
				if(ccnt!=0&&cans[ccnt]==0)
				{
					ccnt--;
					if(cK[ccnt]=='b')
					{
						cans[ccnt]+=ans[i];
						continue;
					}
				}
			}
			else
			{
				cans[ccnt]%=3;
				if(ccnt!=0&&cans[ccnt]==0)
				{
					ccnt--;
					if(cK[ccnt]=='a')
					{
						cans[ccnt]+=ans[i];
						continue;
					}
				}
			}
			ccnt++;
			cK[ccnt]=K[i];
			cans[ccnt]=ans[i];
		}
	}
	if((cans[ccnt]%n==0&&cK[ccnt]=='a')||(cans[ccnt]%3==0&&cK[ccnt]=='b')) ccnt--;
	printf("%d\n",ccnt);
	for(i=1;i<=ccnt;i++)
	printf("%d%c ",cans[i],cK[i]);
}
int main()
{
	scanf("%d",&n);
	int i,j,x,y;
	for(i=1;i<=n;i++)
	{
		scanf("%d",&a[i]);
		sit[a[i]]=i;
	}
	for(i=2;i<=n-2;i++)
	{
		if(sit[i]==cal(sit[1],i-1)) continue;
		if(now(i)!=1) A(n+1-now(i));
		while(now(i-1)<n-1)
		{
			A(2);
			B(1);
		}
		if(now(i-1)==n-1)
		{
			A(1);
			B(2);
		}
	}
	if(n%2==1&&n!=1&&cal(sit[1],n-2)!=sit[n-1]) NO();
	if(cal(sit[1],n-2)!=sit[n-1]) doit();
	final();
	output();
}