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
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
#pragma GCC optimize("O3")
#include <bits/stdc++.h>
// #include <ext/pb_ds/assoc_container.hpp>
// using namespace __gnu_pbds;
// gp_hash_table<int, int> mapka;

using namespace std;
#define PB push_back
#define MP make_pair
#define LL long long
#define int LL
#define FOR(i,a,b) for(int i = (a); i <= (b); i++)
#define RE(i,n) FOR(i,1,n)
#define REP(i,n) FOR(i,0,(int)(n)-1)
#define R(i,n) REP(i,n)
#define VI vector<int>
#define PII pair<int,int>
#define LD long double
#define FI first
#define SE second
#define st FI
#define nd SE
#define ALL(x) (x).begin(), (x).end()
#define SZ(x) ((int)(x).size())

template<class C> void mini(C &a4, C b4) { a4 = min(a4, b4); }
template<class C> void maxi(C &a4, C b4) { a4 = max(a4, b4); }

template<class TH> void _dbg(const char *sdbg, TH h){ cerr<<sdbg<<'='<<h<<endl; }
template<class TH, class... TA> void _dbg(const char *sdbg, TH h, TA... a) {
  while(*sdbg!=',')cerr<<*sdbg++;
  cerr<<'='<<h<<','; _dbg(sdbg+1, a...);
}

template<class T> ostream &operator<<(ostream& os, vector<T> V) {
  os << "["; for (auto vv : V) os << vv << ","; return os << "]";
}
template<class L, class R> ostream &operator<<(ostream &os, pair<L,R> P) {
  return os << "(" << P.st << "," << P.nd << ")";
}

#ifdef LOCAL
#define debug(...) _dbg(#__VA_ARGS__, __VA_ARGS__)
#else
#define debug(...) (__VA_ARGS__)
#define cerr if(0)cout
#endif

void wys(vector<PII> x){
  debug(x);
  vector<int> res;
  for(PII el:x)res.PB(el.FI);
  reverse(ALL(x));
  for(PII el:x)res.PB(el.SE);
  cout << SZ(res) << "\n";
  for(int el:res){
    cout << el + 1 << " ";
  }
  cout << "\n";
}
int32_t main(){
  ios_base::sync_with_stdio(0);
  cin.tie(0);
  cout << fixed << setprecision(11);
  cerr << fixed << setprecision(6);
  int n;
  cin >> n;
  vector<PII> t(n);
  R(i,n){
    cin >> t[i].FI;
    t[i].SE = i;
  }
  sort(ALL(t));
  vector<PII> a,b;
  vector<int> vis(n);
  R(_,n)if(!vis[_]){
    vector<int> cykl;
    int ak = _;
    do{
      vis[ak] = 1;
      cykl.PB(ak);
      ak = t[ak].SE;
    }while(ak != _);
    int siz = SZ(cykl);
    cykl.PB(cykl[0]);
    reverse(ALL(cykl));
    debug(cykl);
    if(siz & 1){
      R(i,siz / 2){
        a.PB({cykl[i + 1], cykl[siz - i - 1]});
        b.PB({cykl[i + 1], cykl[siz - i]});
      }
    }else{
      R(i,siz / 2){
        a.PB({cykl[i], cykl[siz - i -1]});
        if(i) b.PB({cykl[i], cykl[siz - i]});
      }
    }
  }
  if(SZ(a) == 0){
    cout << "0\n";
  }else{
    if(SZ(b) == 0){
      cout << "1\n";
      wys(a);
    }else{
      cout << "2\n";
      wys(a);
      wys(b);
    }
  }
}