#include <bits/stdc++.h>
using namespace std;
using pii=pair<int,int>;
using ll=long long;

int main(){
    int n;cin>>n;
    vector<int> vec(n+1),pref(n+1),dif(n+1);
    for(int i=1;i<=n;i++){
        int a;cin>>a;
        vec[i]=a;
        dif[i]=a-vec[i-1]-1;
        pref[i]=pref[i-1]+dif[i]+1;
        if(i==1){
            dif[1]=0;
            pref[1]=0;
        }
    }
    dif[0]=INT_MAX;//min(1LL*INT_MAX,1LL*vec[1]-1e9);
    vector<pii> ans;
    vector<vector<int>> starts;
    ans.push_back({1,pref[n]});
    starts.push_back({vec[1]});
    for(int i=2;i*i<=n;i++){
        if(n%i)continue;
        int len=0;
        vector<int> kellmeg(n+1);
        for(int j=i;j<=n;j+=i){
            len=max(len,vec[j]-vec[j-i+1]);
            kellmeg[i]=vec[j]-vec[j-i+1];
        }
        for(int j=i;j<=n;j+=i){
            kellmeg[i]=len-kellmeg[i];
        }
        vector<int> seged=dif,kezdo;
        bool ok=true;
        for(int j=i;j<=n;j+=i){
            int x=0;
            if(seged[j-i]>=kellmeg[j]){
                kezdo.push_back(vec[j-i+1]-kellmeg[j]+1);
                continue;
            }else{
                x=kellmeg[j]-seged[j-i];
                kezdo.push_back(vec[j-i+1]-seged[j-j]);
            }
            if(x>seged[j]){
                ok=false;break;
            }else seged[j]-=x;
        }
        if(ok){
            ans.push_back({i,len});
            starts.push_back(kezdo);
        }
    }
    cout<<ans.size()<<'\n';
    for(int i=0;i<(int)ans.size();i++){
        cout<<ans[i].first<<' '<<ans[i].second<<'\n';
        for(int j:starts[i])cout<<j<<'\n';
    }
}