#include <bits/stdc++.h>
using namespace std;
using ll = long long;
const int MOD = 1000000007;
const int MOD2 = 998244353;
const ll INF = 1e18;
const int MX = 1000001; //check the limits, dummy
ll modExp(ll base, ll power) {
if (power == 0) {
return 1;
} else {
ll cur = modExp(base, power / 2); cur = cur * cur; cur = cur % MOD;
if (power % 2 == 1) cur = cur * base;
cur = cur % MOD;
return cur;
}
}
ll inv(ll base) {
return modExp(base, MOD-2);
}
ll mul(ll A, ll B) {
return (A*B)%MOD;
}
ll add(ll A, ll B) {
return (A+B)%MOD;
}
ll dvd(ll A, ll B) {
return mul(A, inv(B));
}
ll sub(ll A, ll B) {
return (A-B+MOD)%MOD;
}
ll* facs = new ll[MX];
ll* facInvs = new ll[MX];
ll choose(ll a, ll b) {
if (b > a) return 0;
if (a < 0) return 0;
if (b < 0) return 0;
ll cur = facs[a];
cur = mul(cur, facInvs[b]);
cur = mul(cur, facInvs[a-b]);
return cur;
}
void initFacs() {
facs[0] = 1;
facInvs[0] = 1;
for (int i = 1 ; i < MX ; i ++ ) {
facs[i] = (facs[i-1] * i) % MOD;
facInvs[i] = inv(facs[i]);
}
}
long long computeLucky(long long n, long long k) {
// We'll accumulate twice the true answer into ans2,
// so we can avoid worrying about (n+1)/2 being fractional when n is even.
long long ans2 = 0;
// segments = 2^i, length = L_i
long long segments = 1;
long long length = n;
// Walk down levels until segments would be shorter than k:
while (length >= k) {
if (length % 2 == 1) {
// This level is odd-length → add segments * (n+1)
ans2 += segments * (n + 1);
}
// split every segment in half for next level
length /= 2;
segments *= 2;
}
// Divide by 2 to get the real sum of midpoints
return ans2 / 2;
}
int main() {
ios_base::sync_with_stdio(0); cin.tie(0);
int T;
cin >> T;
while (T--) {
long long n, k;
cin >> n >> k;
cout << computeLucky(n, k) << "\n";
}
return 0;
}
IAogICAgI2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CiAgICAKICAgIHVzaW5nIG5hbWVzcGFjZSBzdGQ7CgogICAgdXNpbmcgbGwgPSBsb25nIGxvbmc7CiAgICBjb25zdCBpbnQgTU9EID0gMTAwMDAwMDAwNzsgCiAgICBjb25zdCBpbnQgTU9EMiA9ICA5OTgyNDQzNTM7IAogICAgY29uc3QgbGwgSU5GID0gMWUxODsKICAgIGNvbnN0IGludCBNWCA9IDEwMDAwMDE7IC8vY2hlY2sgdGhlIGxpbWl0cywgZHVtbXkKCgogICAgbGwgbW9kRXhwKGxsIGJhc2UsIGxsIHBvd2VyKSB7CiAgICAgICAgaWYgKHBvd2VyID09IDApIHsKICAgICAgICAgICAgcmV0dXJuIDE7CiAgICAgICAgfSBlbHNlIHsKICAgICAgICAgICAgbGwgY3VyID0gbW9kRXhwKGJhc2UsIHBvd2VyIC8gMik7IGN1ciA9IGN1ciAqIGN1cjsgY3VyID0gY3VyICUgTU9EOwogICAgICAgICAgICBpZiAocG93ZXIgJSAyID09IDEpIGN1ciA9IGN1ciAqIGJhc2U7CiAgICAgICAgICAgIGN1ciA9IGN1ciAlIE1PRDsKICAgICAgICAgICAgcmV0dXJuIGN1cjsKICAgICAgICB9CiAgICB9CgogICAgbGwgaW52KGxsIGJhc2UpIHsKICAgICAgICByZXR1cm4gbW9kRXhwKGJhc2UsIE1PRC0yKTsKICAgIH0KCgogICAgbGwgbXVsKGxsIEEsIGxsIEIpIHsKICAgICAgICByZXR1cm4gKEEqQiklTU9EOwogICAgfQoKICAgIGxsIGFkZChsbCBBLCBsbCBCKSB7CiAgICAgICAgcmV0dXJuIChBK0IpJU1PRDsKICAgIH0KICAgIAogICAgbGwgZHZkKGxsIEEsIGxsIEIpIHsKICAgICAgICByZXR1cm4gbXVsKEEsIGludihCKSk7CiAgICB9CgogICAgbGwgc3ViKGxsIEEsIGxsIEIpIHsKICAgICAgICByZXR1cm4gKEEtQitNT0QpJU1PRDsKICAgIH0KCiAgICBsbCogZmFjcyA9IG5ldyBsbFtNWF07CiAgICBsbCogZmFjSW52cyA9IG5ldyBsbFtNWF07CgogICAgbGwgY2hvb3NlKGxsIGEsIGxsIGIpIHsKICAgICAgICBpZiAoYiA+IGEpIHJldHVybiAwOwogICAgICAgIGlmIChhIDwgMCkgcmV0dXJuIDA7CiAgICAgICAgaWYgKGIgPCAwKSByZXR1cm4gMDsKICAgICAgICBsbCBjdXIgPSBmYWNzW2FdOwogICAgICAgIGN1ciA9IG11bChjdXIsIGZhY0ludnNbYl0pOwogICAgICAgIGN1ciA9IG11bChjdXIsIGZhY0ludnNbYS1iXSk7CiAgICAgICAgcmV0dXJuIGN1cjsKICAgIH0KCiAgICAKICAgIHZvaWQgaW5pdEZhY3MoKSB7CiAgICAgICAgZmFjc1swXSA9IDE7IAogICAgICAgIGZhY0ludnNbMF0gPSAxOwogICAgICAgIGZvciAoaW50IGkgPSAxIDsgaSA8IE1YIDsgaSArKyApIHsKICAgICAgICAgICAgZmFjc1tpXSA9IChmYWNzW2ktMV0gKiBpKSAlIE1PRDsKICAgICAgICAgICAgZmFjSW52c1tpXSA9IGludihmYWNzW2ldKTsKICAgICAgICB9CiAgICB9CiAgICBsb25nIGxvbmcgY29tcHV0ZUx1Y2t5KGxvbmcgbG9uZyBuLCBsb25nIGxvbmcgaykgewogICAgICAgIC8vIFdlJ2xsIGFjY3VtdWxhdGUgdHdpY2UgdGhlIHRydWUgYW5zd2VyIGludG8gYW5zMiwKICAgICAgICAvLyBzbyB3ZSBjYW4gYXZvaWQgd29ycnlpbmcgYWJvdXQgKG4rMSkvMiBiZWluZyBmcmFjdGlvbmFsIHdoZW4gbiBpcyBldmVuLgogICAgICAgIGxvbmcgbG9uZyBhbnMyID0gMDsKICAgICAgICAKICAgICAgICAvLyBzZWdtZW50cyA9IDJeaSwgbGVuZ3RoID0gTF9pCiAgICAgICAgbG9uZyBsb25nIHNlZ21lbnRzID0gMTsKICAgICAgICBsb25nIGxvbmcgbGVuZ3RoICAgPSBuOwogICAgICAgIAogICAgICAgIC8vIFdhbGsgZG93biBsZXZlbHMgdW50aWwgc2VnbWVudHMgd291bGQgYmUgc2hvcnRlciB0aGFuIGs6CiAgICAgICAgd2hpbGUgKGxlbmd0aCA+PSBrKSB7CiAgICAgICAgICAgIGlmIChsZW5ndGggJSAyID09IDEpIHsKICAgICAgICAgICAgICAgIC8vIFRoaXMgbGV2ZWwgaXMgb2RkLWxlbmd0aCDihpIgYWRkIHNlZ21lbnRzICogKG4rMSkKICAgICAgICAgICAgICAgIGFuczIgKz0gc2VnbWVudHMgKiAobiArIDEpOwogICAgICAgICAgICB9CiAgICAgICAgICAgIC8vIHNwbGl0IGV2ZXJ5IHNlZ21lbnQgaW4gaGFsZiBmb3IgbmV4dCBsZXZlbAogICAgICAgICAgICBsZW5ndGggICAvPSAyOwogICAgICAgICAgICBzZWdtZW50cyAqPSAyOwogICAgICAgIH0KICAgICAgICAKICAgICAgICAvLyBEaXZpZGUgYnkgMiB0byBnZXQgdGhlIHJlYWwgc3VtIG9mIG1pZHBvaW50cwogICAgICAgIHJldHVybiBhbnMyIC8gMjsKICAgIH0KCiAgICBpbnQgbWFpbigpICB7CiAgICAgICAgaW9zX2Jhc2U6OnN5bmNfd2l0aF9zdGRpbygwKTsgY2luLnRpZSgwKTsgIAogICAgICAgIGludCBUOwogICAgICAgIGNpbiA+PiBUOwogICAgICAgIHdoaWxlIChULS0pIHsKICAgICAgICAgICAgbG9uZyBsb25nIG4sIGs7CiAgICAgICAgICAgIGNpbiA+PiBuID4+IGs7CiAgICAgICAgICAgIGNvdXQgPDwgY29tcHV0ZUx1Y2t5KG4sIGspIDw8ICJcbiI7CiAgICAgICAgfQoKCiAgICAgICAgCiAgICAgICAgcmV0dXJuIDA7CiAgICB9CiAgICA=