【codevs1743】反转卡片

题目描述 Description
【dzy493941464|yywyzdzr原创】

小A将N张卡片整齐地排成一排，其中每张卡片上写了1~N的一个整数，每张卡片上的数各不相同。

比如下图是N=5的一种情况：3 4 2 1 5

接下来你需要按小A的要求反转卡片，使得左数第一张卡片上的数字是1。操作方法：令左数第一张卡片上的数是K，如果K=1则停止操作，否则将左数第1~K张卡片反转。

第一次(K=3)反转后得到：2 4 3 1 5

第二次(K=2)反转后得到：4 2 3 1 5

第三次(K=4)反转后得到：1 3 2 4 5

可见反转3次后，左数第一张卡片上的数变成了1，操作停止。

你的任务是，对于一种排列情况，计算要反转的次数。你可以假设小A不会让你操作超过100000次。

输入描述 Input Description
第1行一个整数N；

第2行N个整数，为1~N的一个全排列。

输出描述 Output Description
仅1行，输出一个整数表示要操作的次数。

如果经过有限次操作仍无法满足要求，输出-1。

样例输入 Sample Input
5

3 4 2 1 5

样例输出 Sample Output
3

数据范围及提示 Data Size & Hint
0

#include<cstdio>
#include<iostream>
#include<cstring>
#include<algorithm>
#include<cmath>
#define ll long long
#define inf 3000000000 
int n,ans,rt;
int a[300005];
int c[300005][2],fa[300005],size[300005],val[300005];
bool rev[300005];
using namespace std;
int read(){
    int x=0;char ch=getchar();
    while(ch<'0'||ch>'9')ch=getchar();
    while(ch>='0'&&ch<='9'){x=x*10+ch-'0';ch=getchar();}
    return x;
}

void pushdown(int k){
    int l=c[k][0],r=c[k][1];
    rev[k]^=1;rev[l]^=1;rev[r]^=1;
    swap(c[k][0],c[k][1]);
}

void rotate(int x,int &k){
    int y=fa[x],z=fa[y],l,r;
    if (c[y][0]==x)l=0;else l=1;r=l^1;
    if (y==k) k=x;
    else if (c[z][0]==y)c[z][0]=x;else c[z][1]=x;
    fa[x]=z;fa[y]=x;
    c[y][l]=c[x][r];
    fa[c[x][r]]=y;
    c[x][r]=y;
    size[y]=size[c[y][0]]+size[c[y][1]]+1;
    size[x]=size[c[x][0]]+size[c[x][1]]+1;
}

void splay(int x,int &k){
    int y,z;
    while (x!=k){
        y=fa[x];z=fa[y];
        if (y!=k){
            if (c[z][0]==y^c[y][0]==x) rotate(x,k);else rotate(y,k);
        }
        rotate(x,k);
    }
}

void build(int l,int r,int f){
    if (l>r) return;
    int mid=(l+r)/2;
    if (mid<f)c[f][0]=mid;else c[f][1]=mid;
    size[mid]=1;fa[mid]=f;val[mid]=a[mid];
    if (l==r) return;
    build(l,mid-1,mid);build(mid+1,r,mid);
    size[mid]=size[c[mid][0]]+size[c[mid][1]]+1;
}

int find(int k,int rk){
    if (rev[k]) pushdown(k);
    int l=c[k][0],r=c[k][1];
    if (size[l]+1==rk) return k;
    else if (size[l]>=rk) return find(l,rk);
    else return find(r,rk-size[l]-1);
}

void rever(int l,int r){
    int x=find(rt,l),y=find(rt,r+2);
    splay(x,rt);splay(y,c[x][1]);
    rev[c[y][0]]^=1;
}

int main(){
    n=read();
    for (int i=2;i<=n+1;i++){
        a[i]=read();
    }
    build(1,n+2,0);rt=(n+3)>>1;
    while(val[find(rt,2)]!=1){
        ans++;
        rever(1,val[find(rt,2)]);
        if (ans>100000){
            puts("-1");return 0;
        }
    }
    printf("%d\n",ans);
    return 0;
}