#include <cstdio>
#include <string>
#include <cstring>
#include <vector>
#include <bits/stdc++.h>
const int N = 25;
int n, base[2] = {10, 16};
__int128 dp[N][N], leqlen[N][N];

int fromchar(char c) {
	if (c <= '9' && c >= '0') return c - '0';
	else return c - 'a' + 10;
}

char tochar(int c) {
	if (c >= 10) return 'a' + c - 10;
	return '0' + c;
}

void outhex(__int128 x) {
	if (!x) {
		printf("0\n");
		return;
	}
	std::vector<int> repr;
	while (x) {
		repr.push_back(x % 16);
		x /= 16;
	}
	for (int i = (int)repr.size() - 1; i >= 0; --i) {
		int c = repr[i];
		if (c < 10) printf("%d", c);
		else printf("%c", 'a' + c - 10);
	}
	printf("\n");
}

__int128 readhex() {
	char s[N];
	scanf("%s", s);
	__int128 r = 0;
	for (int i = 0; s[i]; ++i) {
		r *= 16;
		r += fromchar(s[i]);
	}
	return r;
}

__int128 f(const char *s, int b, bool last) {
	if (s[0] == '0') return last;
	int len = strlen(s), avail = base[b];
	bool u[N] = {0};
	__int128 ans = leqlen[len - 1][avail];
	for (int i = 0; s[i]; ++i) {
		int c = fromchar(s[i]);
		if (avail - i - 1 < 0) return ans;
		for (int j = 0 + (!i); j < c; ++j) if (!u[j]) ans += dp[len - i - 1][avail - i - 1];
		if (u[c]) return ans;
		u[c] = true;
	}
	return ans + (__int128)last;
}

std::string solve(__int128 ind, bool b) {
	std::string ans;
	if (ind == 1) {
		ans.push_back('0');
		return ans;
	}
	int len, avail = base[b];
	--ind;
	for (len = 0; len < N && leqlen[len][avail] <= ind; ++len);
	if (len == N) {
		ans.push_back('-');
		return ans;
	}
	ind -= leqlen[len - 1][avail];
	bool u[N] = {0};
	for (int i = 0; i < len; ++i) {
		int j = 0;
		if (!i) ++j;
		--avail;
		for (; dp[len - i - 1][avail] <= ind; ++j) {
			if (!u[j]) ind -= dp[len - i - 1][avail];
		}
		while (u[j]) ++j;
		ans.push_back(tochar(j));
		u[j] = 1;
	}
	return ans;
}
#include <random>
#include <cassert>
/*

void solve1(__int128 ind, bool b) {
	__int128 l = 0, r = (__int128)0 - 1;
	printf("rmost %llu\n", r);
	while (l < r) {
		__int128 m = l + (r - l) / 2;
		if (f(std::to_string(m).c_str(), 0, 
	}
}
*/

__int128 to_int(std::string s, bool b) {
	__int128 r = 0;
	for (int i = 0; s[i]; ++i) {
		r *= base[b];
		r += fromchar(s[i]);
	}
	return r;
}

int main() {
	for (int i = 0; i < N; ++i) {
		for (int j = 0; j < N; ++j) {
			if (!i) dp[i][j] = leqlen[i][j] = 1;
			else {
				if (j) dp[i][j] = j * dp[i - 1][j - 1];
				leqlen[i][j] = leqlen[i - 1][j] + (j ? dp[i - 1][j - 1] * (j - 1) : 0);
			}
		}
	}
	scanf("%d", &n);
	/*
	std::mt19937_64 rng(228);
	while (n--) {
		__int128 x = rng() % 1000 + 2;
		std::string str = solve(x, 0);
		__int128 val = to_int(str, 0);
		if (str == "-") continue;
		if (f(std::to_string(val - 1).c_str(), 0, 1) != x - 1) {
			printf("x is %lld\n", x);
			printf("got str %s\n", str.c_str());
			printf("f returned %llu\n", f(std::to_string(val - 1).c_str(), 0, 1));
		}
	}
	return 0;
	*/
	while (n--) {
		int type;
		char b;
		scanf(" %c%d", &b, &type);
		b = b == 'd' ? 0 : 1;
		if (type == 0) {
			char l[N], r[N];
			scanf("%s%s", l, r);
			unsigned long long ans = f(r, b, 1) - f(l, b, 0);
			if (b == 1) outhex(ans);
			else printf("%llu\n", ans);
		} else {
			__int128 ind;
			unsigned long long ind2;
			if (b == 1) ind = readhex();
			else{
			       	scanf("%llu", &ind2);
				ind = ind2;
			}
			printf("%s\n", solve(ind, b).c_str());
			//solve1(ind, b);
		}
	}
	return 0;
}