1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
#include <bits/stdc++.h>

using namespace std;

#define endl '\n'
#define st first
#define nd second
#define pb push_back
#define sz(x) (int)(x).size()
#define all(x) (x).begin(), (x).end()
#define ll long long
#define ld long double
ll mod=1000000007;
int inf=1000000007;
ll infl=1000000000000000007;

const int N=3007;

int a[N];
bool odw[N];

int main()
{
    ios_base::sync_with_stdio(0);
    cin.tie(0);
    cout.tie(0);
    int n;
    cin>>n;
    vector<pair<int,int>>V;
    for(int i=1;i<=n;i++)
    {
        cin>>a[i];
        V.pb({a[i],i});
    }
    sort(all(V));
    for(int i=0;i<n;i++) a[V[i].nd]=i+1;
    vector<pair<int,int>>V1,V2;
    for(int i=1;i<=n;i++)
    {
        if(odw[i]) continue;
        int j=i;
        vector<int>V;
        while(true)
        {
            if(odw[j]) break;
            V.pb(j);
            odw[j]=1;
            j=a[j];
        }
        int k=sz(V);
        if(k==2) V2.pb({V[0],V[1]});
        else if(k>2)
        {
            for(int j=1;j<=(k-1)/2;j++) V1.pb({V[j],V[k-j]});
            V2.pb({V[0],V[1]});
            for(int j=1;j<=(k-2)/2;j++) V2.pb({V[j+1],V[k-j]});
        }
    }
    if(sz(V1)==0&&sz(V2)==0) cout<<0<<endl;
    else if(sz(V1)==0)
    {
        cout<<1<<endl;
        cout<<2*sz(V2)<<endl;
        for(int i=0;i<sz(V2);i++) cout<<V2[i].st<<" ";
        for(int i=sz(V2)-1;i>=0;i--) cout<<V2[i].nd<<" ";
        cout<<endl;
    }
    else
    {
        cout<<2<<endl;
        cout<<2*sz(V1)<<endl;
        for(int i=0;i<sz(V1);i++) cout<<V1[i].st<<" ";
        for(int i=sz(V1)-1;i>=0;i--) cout<<V1[i].nd<<" ";
        cout<<endl;
        cout<<2*sz(V2)<<endl;
        for(int i=0;i<sz(V2);i++) cout<<V2[i].st<<" ";
        for(int i=sz(V2)-1;i>=0;i--) cout<<V2[i].nd<<" ";
        cout<<endl;
    }

    return 0;
}