/* ---------- STL Libraries ---------- */

// IO library
#include <cstdio>
#include <fstream>
#include <iomanip>
#include <ios>
#include <iostream>

// algorithm library
#include <algorithm>
#include <cmath>
#include <numeric>
#include <random>

// container library
#include <array>
#include <bitset>
#include <deque>
#include <map>
#include <queue>
#include <set>
#include <string>
#include <tuple>
#include <vector>

/* ---------- Namespace ---------- */

using namespace std;

/* ---------- Type Abbreviation ---------- */

template <typename T>
using PQ = priority_queue<T>;
template <typename T>
using GPQ = priority_queue<T, vector<T>, greater<T>>;

using ll = long long;

#define fst first
#define snd second
#define mp make_pair
#define mt make_tuple

/* ---------- conversion ---------- */

#define INT(c) static_cast<int>(c)
#define CHAR(n) static_cast<char>(n)
#define LL(n) static_cast<ll>(n)
#define DOUBLE(n) static_cast<double>(n)

/* ---------- container ---------- */

#define ALL(v) (v).begin(), (v).end()
#define SIZE(v) (LL((v).size()))

#define FIND(v, k) (v).find(k) != (v).end()
#define VFIND(v, k) find(ALL(v), k) != (v).end()

#define gsort(b, e) sort(b, e, greater<decltype(*b)>())

/* ----------- debug ---------- */

template <class T>
ostream& operator<<(ostream& os, vector<T> v) {
    os << "[";
    for (auto vv : v)
        os << vv << ",";
    return os << "]";
}

template <class T>
ostream& operator<<(ostream& os, set<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.fst << "," << p.snd << ")";
}

/* ---------- Constants ---------- */

// const ll MOD = 1e9 + 7;
// const int INF = 1 << 25;
// const ll INF = 1LL << 50;
// const double PI = acos(-1);
// const double EPS = 1e-10;
// mt19937 mert(LL(time(0)));

/* ---------- Short Functions ---------- */

template <typename T>
T sq(T a) {
    return a * a;
}

template <typename T>
T gcd(T a, T b) {
    if (a > b) return gcd(b, a);
    return a == 0 ? b : gcd(b % a, a);
}

template <typename T, typename U>
T mypow(T b, U n) {
    if (n == 0) return 1;
    if (n == 1) return b /* % MOD */;
    if (n % 2 == 0) {
        return mypow(b * b /* % MOD */, n / 2);
    } else {
        return mypow(b, n - 1) * b /* % MOD */;
    }
}

ll pcnt(ll b) {
    return __builtin_popcountll(b);
}

/* v-v-v-v-v-v-v-v-v Main Part v-v-v-v-v-v-v-v-v */

int main() {
    int N;
    cin >> N;

    int x[N + 1];
    for (int i = 0; i < N; ++i) {
        cin >> x[i];
    }

    int L, Q;
    cin >> L >> Q;

    int fore[20][N];
    int back[20][N];
    // fore[d][i] = 2^d日でx_iからどこまで進めるか
    // back[d][i] = 2^d日でx_iからどこまで戻れるか

    for (int i = 0; i < N; ++i) {
        int ok = i, ng = N;
        while (ng - ok > 1) {
            int mid = (ok + ng) / 2;
            if (x[mid] - x[i] <= L) {
                ok = mid;
            } else {
                ng = mid;
            }
        }
        fore[0][i] = ok;

        ok = i, ng = -1;
        while (ok - ng > 1) {
            int mid = (ok + ng) / 2;
            if (x[i] - x[mid] <= L) {
                ok = mid;
            } else {
                ng = mid;
            }
        }
        back[0][i] = ok;
    }

    for (int d = 1; d < 20; ++d) {
        for (int i = 0; i < N; ++i) {
            fore[d][i] = fore[d - 1][fore[d - 1][i]];
            back[d][i] = back[d - 1][back[d - 1][i]];
        }
    }

    for (int q = 0; q < Q; ++q) {
        int a, b;
        cin >> a >> b;
        --a;
        --b;
        int ans = 0;
        if (a <= b) {
            while (a < b) {
                if (fore[0][a] >= b) {
                    ++ans;
                    a = fore[0][a];
                    continue;
                }
                for (int d = 19; d >= 0; --d) {
                    if (fore[d][a] >= b) continue;
                    ans += (1 << d);
                    a = fore[d][a];
                    break;
                }
            }
        } else {
            while (a > b) {
                if (back[0][a] <= b) {
                    ++ans;
                    a = back[0][a];
                    continue;
                }
                for (int d = 19; d >= 0; --d) {
                    if (back[d][a] <= b) continue;
                    ans += (1 << d);
                    a = back[d][a];
                    break;
                }
            }
        }

        cout << ans << endl;
    }
    return 0;
}


Measured memory_bytes: 16896