using System;
using System.Collections.Generic;
using System.Text;

public class Program
{
    private int N;
    private int[] X;
    private int L;
    private int Q;

    // Index[i][j] iから2^j日で行ける宿
    private List<int>[] Index;

    public void Solve()
    {
        var sc = new Scanner();
        N = sc.NextInt();
        X = sc.IntArray();
        L = sc.NextInt();

        MkIndex();

        int Q = sc.NextInt();

        var sb = new StringBuilder();

        for (int i = 0; i < Q; i++)
        {
            sb.AppendLine(Query(sc.NextInt() - 1, sc.NextInt() - 1).ToString());
        }
        Console.Write(sb.ToString());
    }

    private int Query(int a, int b)
    {
        if (a > b)
        {
            int t = a;
            a = b;
            b = t;
        }
        int min = 0;
        int max = b - a;
        while (max-min > 1)
        {
            int med = (min + max) / 2;
            if (Calc(a, med) >= b)
            {
                max = med;
            }
            else
            {
                min = med;
            }
        }

        return max;
    }

    // iからd日で行けるとこ
    private int Calc(int i, int d)
    {
        if (d == 0) return i;
        int n = (int)Math.Log(d, 2);
        if (Index[i].Count <= n)
        {
            return N;
        }

        return Calc(Index[i][n], d - (1 << n));
    }

    private void MkIndex()
    {
        Index = new List<int>[N];

        for (int i = 0; i < N; i++)
        {
            Index[i] = new List<int>();
        }

        int sum = 0;
        int left = 1;
        for (int i = 1; i < N; i++)
        {
            sum += X[i] - X[i - 1];
            for (; sum > L; left++)
            {
                Index[left - 1].Add(i - 1);
                sum -= X[left] - X[left - 1];
            }
        }

        for (; left < N; left++)
        {
            Index[left - 1].Add(N - 1);
        }

        for (int i = 0;; i++)
        {
            bool flag = true;
            for (int j = 0; j < N; j++)
            {
                if (Index[j].Count >= i + 1 && Index[Index[j][i]].Count >= i + 1)
                {
                    Index[j].Add(Index[Index[j][i]][i]);
                    flag = false;
                }
            }
            if(flag)
                break;
        }
    }

    public static void Main(string[] args)
    {
        new Program().Solve();
    }
}

class Scanner
{
    public Scanner()
    {
        _pos = 0;
        _line = new string[0];
    }

    const char Separator = ' ';
    private int _pos;
    private string[] _line;

    #region スペース区切りで取得

    public string Next()
    {
        if (_pos >= _line.Length)
        {
            _line = Console.ReadLine().Split(Separator);
            _pos = 0;
        }

        return _line[_pos++];
    }

    public int NextInt()
    {
        return int.Parse(Next());
    }

    public long NextLong()
    {
        return long.Parse(Next());
    }

    public double NextDouble()
    {
        return double.Parse(Next());
    }

    #endregion

    #region 型変換

    private int[] ToIntArray(string[] array)
    {
        var result = new int[array.Length];
        for (int i = 0; i < array.Length; i++)
        {
            result[i] = int.Parse(array[i]);
        }

        return result;
    }

    private long[] ToLongArray(string[] array)
    {
        var result = new long[array.Length];
        for (int i = 0; i < array.Length; i++)
        {
            result[i] = long.Parse(array[i]);
        }

        return result;
    }

    private double[] ToDoubleArray(string[] array)
    {
        var result = new double[array.Length];
        for (int i = 0; i < array.Length; i++)
        {
            result[i] = double.Parse(array[i]);
        }

        return result;
    }

    #endregion

    #region 配列取得

    public string[] Array()
    {
        if (_pos >= _line.Length)
            _line = Console.ReadLine().Split(Separator);

        _pos = _line.Length;
        return _line;
    }

    public int[] IntArray()
    {
        return ToIntArray(Array());
    }

    public long[] LongArray()
    {
        return ToLongArray(Array());
    }

    public double[] DoubleArray()
    {
        return ToDoubleArray(Array());
    }

    #endregion
}

Measured memory_bytes: 48304