// Slower C++ solution:
/*

　　　  ∧＿∧　やあ

　　 （´・ω・｀)　　　　　/　　　　　ようこそ、バーボンハウスへ。

　　 ／∇y:::::＼　　　 [￣]　　　　　このテキーラはサービスだから、まず飲んで落ち着いて欲しい。

　　 |:⊃:|:::::|　　　|──|

￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣|　うん、「また」なんだ。済まない。

￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣|￣　  仏の顔もって言うしね、謝って許してもらおうとも思っていない。

￣￣￣￣￣￣￣￣￣￣￣￣￣￣／|

　　　　∇　∇　∇　∇　　　／.／|　　　でも、この提出を見たとき、君は、きっと言葉では言い表せない

　　　　┴　┴　┴　┴　／ ／　  |　　　「ときめき」みたいなものを感じてくれたと思う。

￣￣￣￣￣￣￣￣￣￣|／　　  |　　　殺伐としたコンテストの中で、そういう気持ちを忘れないで欲しい

￣￣￣￣￣￣￣￣￣￣　　　　 |　　　そう思って、この提出を投げたんだ。

　　　(⊆⊇)　(⊆⊇)　(⊆⊇)　　|

　    ||　　 ||　　||　　|　　　 じゃあ、判定を聞こうか。

　　.／|＼　／|＼ ／|＼

*/



#include <iostream>

#include <cstdlib>

#include <algorithm>

#include <array>

#include <bitset>

#include <climits>

#include <cmath>

#include <cstdio>

#include <deque>

#include <functional>

#include <list>

#include <map>

#include <numeric>

#include <queue>

#include <set>

#include <string>

#include <vector>

using namespace std;

#define fst first

#define snd second

#define mp make_pair

#define ALL(obj) (obj).begin(),(obj).end()

#define FOR(i,a,b) for(int i=(a);i<(b);i++)

#define RFOR(i,a,b) for(int i = (b-1);i>=a;i--)

#define REP(i,n)  FOR(i,0,n)

#define RREP(i,n) RFOR(i,0,n) 

#define SIZE(x) ((int)(x).size())

#define debug(x) cerr << #x << " -> " << x << " (line:" << __LINE__ << ")" << '\n';

#define debugpair(x, y) cerr << "(" << #x << ", " << #y << ") -> (" << x << ", " << y << ") (line:" << __LINE__ << ")" << '\n';

typedef long long lint;

typedef pair<int, int> pint;

typedef pair<lint, lint> plint;

typedef vector<lint> vec;

typedef vector<vector<lint>> matrix;

typedef priority_queue<lint> p_que;

typedef priority_queue<lint, vector<lint>, greater<lint>> p_que_rev;

const lint INF = INT_MAX;

const lint LINF = LLONG_MAX;

const lint MOD = 1000000000 + 7;

const double EPS = 1e-9;

const double PI = acos(-1);

const int di[]{0, -1, 0, 1, -1, -1, 1, 1};

const int dj[]{1, 0, -1, 0, 1, -1, -1, 1};



lint gcd(lint a, lint b) {

    lint r;

    while (b != 0) {

        r = a % b;

        a = b; 

        b = r;

    }

    return a;

}



lint lcm(lint a, lint b) {

    return (a / gcd(a, b)) * b;

}



lint power(lint x, lint n, lint mod = MOD) {

    lint ret = 1;

    while(n > 0) {

        if(n & 1){

            (ret *= x) %= mod;

        }

        (x *= x) %= mod;

        n >>= 1;

    }

    return ret;

}



vector<lint> make_power(int n, lint base){

    lint num = 1;

    vector<lint> ret;

    for (int i=0; i<=n; ++i){

        ret.push_back(num);

        num *= base;

    }

    return ret;

}



pair<vector<bool>, vector<int>> eratosthenes(int n){

    vector<int> res;

    vector<bool> is_prime(n + 1, true);

    for (int p = 2; p <= n; p++) {

        if (!is_prime[p]){

            continue;

        }

        for (int k = p * 2; k <= n; k += p){

            is_prime[k] = false;

        }

        res.push_back(p);

    }

    return make_pair(is_prime, res);

}



int q;

vector<int> l, r;



void input(){

    cin >> q;

    l.resize(q);

    r.resize(q);

    REP(i, q){

        cin >> l[i] >> r[i];

    }

    return;

}



void solve(){

    const int max_r = 100010;

    auto er = eratosthenes(max_r);

    vector<lint> sum(max_r, 0);

    for(int i=3; i<=max_r; i+=2){

        // debugpair(i, er.fst[i]);

        if(er.fst[i] && er.fst[(i + 1) / 2]){

            sum[i]++;

        }

    }

    REP(i, max_r-1){

        sum[i+1] += sum[i];

    }

    REP(i, q){

        cout << sum[r[i]] - sum[l[i] - 1] << endl;

    }

}



int main()

{

    cin.tie(0);

    ios_base::sync_with_stdio(false);

    input();

    solve();

    return 0;

}

// Faster C++ solution for the same problem (measured speedup: 1.2422757123299892x):
#include<bits/stdc++.h>

using namespace std;

int jishu[100001],qian[100001];

int zs(int a){//输入一个数a，运行完毕后在数组里有小于a的质数，返回小于a的质数的个数 

	int sum=0;

	int i,j;

	for(i=2;i<=sqrt(a);i++){

		if(jishu[i]==0) continue;

		for(j=i*2;j<=a;j+=i){

			jishu[j]=0;

		} 

	}

	return sum;

}

int main(){

	for(int i=1;i<=100000;i++) jishu[i]=1;

	zs(100000);

	jishu[1]=0;

	int n;

	cin>>n;

	qian[1]=0;

	for(int i=2;i<=100000;i++){

		if(jishu[i]&&jishu[(i+1)/2])

			qian[i]=qian[i-1]+1;

		else

			qian[i]=qian[i-1];

	}

	for(int i=1;i<=n;i++){

		int a,b;

		scanf("%d%d",&a,&b);

		printf("%d\n",qian[b]-qian[a-1]);

	}

	return 0;

}