#include <cstdio>
#include <cstring>
#include <string>
#include <iostream>
#include <cmath>
#include <bitset>
#include <vector>
#include <map>
#include <set>
#include <queue>
#include <deque>
#include <algorithm>
#include <unordered_map>
using namespace std;
typedef long long int ll;
typedef pair<int, int> P;
const int sq=2000;
int main()
{
	int n;
  cin>>n;
  int a[300001];
  for(int i=0; i<n; i++) cin>>a[i];
  int x[300001];
  vector<int> v[151];
  ll ans=0;
  for(int i=0; i<n; i++){
    int l, r;
    cin>>l>>r;
    x[i]=a[i]+r;
    if((i+1)%sq==0){
      for(int j=i/sq*sq; j<=i; j++){
        v[i/sq].push_back(x[j]);
      }
      sort(v[i/sq].begin(), v[i/sq].end());
    }
    int i1=lower_bound(a, a+i, a[i]-l)-a;
    if(i1==i) continue;
    if(i1/sq==(i-1)/sq){
      for(int j=i1; j<i; j++){
        if(x[j]>=a[i]) ans++;
      }
      continue;
    }
    for(int j=i1/sq+1; j<(i-1)/sq; j++){
      ans+=((ll)(v[j].end()-lower_bound(v[j].begin(), v[j].end(), a[i])));
    }
    for(int j=i1; j<(i1/sq+1)*sq; j++){
      if(x[j]>=a[i]) ans++;
    }
    for(int j=(i-1)/sq*sq; j<i; j++){
      if(x[j]>=a[i]) ans++;
    }
  }
	cout<<ans<<endl;
	return 0;
}