#include <bits/stdc++.h>
#define endl '\n'
#define int long long
#define fi first
#define se second
using namespace std;
const int N=1e5+10;
const int inf=0x3f3f3f3f3f3f3f3f;
int n;
int a[N];
int cnt;
pair<int,int> p[10*N];
set<pair<int,int>> st;
signed main()
{
	//freopen(".in","r",stdin);
    //freopen(".out","w",stdout);
	cin.tie(0);
	cout.tie(0);
	ios::sync_with_stdio(false);
	cin>>n;
	for(int i=1;i<=n;i++)
    {
        cin>>a[i];
        if(a[i]) st.insert({a[i],i});
    }
    while(st.size()>1)
    {
        auto it=st.end();
        it--;
        auto x=*it;
        st.erase(it);
        it=st.end();
        it--;
        auto y=*it;
        st.erase(it);
        if(x.fi!=y.fi)
        {
            int p=y.fi;
            st.insert(y);
            auto itx=st.lower_bound({p,0});
            y=*itx;
            st.erase(itx);
        }
        x.fi--,y.fi--;
        p[++cnt]={min(x.se,y.se),max(x.se,y.se)};
        if(x.fi) st.insert(x);
        if(y.fi) st.insert(y);
    }
    if(st.size())
    {
        auto x=*st.begin();
        while(x.fi--) p[++cnt]={x.se,x.se};
    }
    sort(p+1,p+cnt+1);
    int cur=100;
    while(cur--)
    {
        sort(p+1,p+cnt+1);
        for(int i=1;i<n;i++)
        {
            if(p[i].fi<p[i+1].fi&&p[i].se!=p[i+1].se&&p[i].se>p[i+1].fi)
            {
                swap(p[i].se,p[i+1].fi);
                if(p[i+1].se<p[i+1].fi) swap(p[i+1].fi,p[i+1].se);
            }
        }
    }
    sort(p+1,p+cnt+1);
    cout<<cnt<<endl;
    for(int i=1;i<=cnt;i++) cout<<p[i].fi<<" "<<p[i].se<<endl;
    return 0;
}