#include<cstring>
#include<cstdio>
#include<cstdlib>
using namespace std;

struct trie
{
	int v, p;
	trie *next[28];
	bool fiu[28];
	trie()
	{
		v = p = 0;
		for (int i = 0; i < 28; ++i)
			fiu[i] = false;
	}
};

trie *t = new trie;

void insert(char* cuv);
void erase(char* cuv);
void writen(char* cuv);
void writep(char* cuv);

int main()
{
	freopen("trie.out", "w", stdout);
	freopen("trie.in", "r", stdin);
	
	char line[32];
	fgets(line, 32, stdin);

	while (!feof(stdin))
	{
		
		switch (line[0] - '0')
		{
		case 0:
			insert(line + 2); break;
		case 1:
			erase(line + 2); break;
		case 2:
			writen(line + 2); break;
		case 3:
			writep(line + 2); break;
		};
		fgets(line, 32, stdin);
	}
	return 0;
}

void insert(char* cuv)
{
	trie *aux =  new trie;
	aux = t;
	for (int i = 0; i < (int)strlen(cuv) - 1; ++i)
	{
		if (aux->fiu[cuv[i] - 'a'] == true)
		{
			aux = aux->next[cuv[i] - 'a'];
		}
		else
		{
			trie *nod = new trie;
			aux->next[cuv[i] - 'a'] = nod;
			aux->fiu[cuv[i] - 'a'] = true;
			aux = nod;
		}
		++aux->p;
	}
	++aux->v;
}

void erase(char* cuv)
{
	trie *aux = new trie, *aux2 = new trie;
	aux = t;
	for (int i = 0; i < (int)strlen(cuv) - 1; ++i)
	{
		aux = aux->next[cuv[i] - 'a'];
		--aux->p;
	}
	--aux->v;
	if (aux->v == 0)
	{
		int i;
		
		aux = t;
		aux = aux->next[cuv[0] - 'a'];
		for (i = 1; i < (int)strlen(cuv) - 2; ++i)
		{
			if (aux->p == 0)
			{
				aux2 = aux;
				aux = aux->next[cuv[i] - 'a'];
				delete aux2;
			}
		}
	}
}

void writen(char* cuv)
{
	trie *aux = new trie;
	aux = t;
	for (int i = 0; i < (int)strlen(cuv) - 1; ++i)
		if (aux->fiu[cuv[i] - 'a'] == true)
			aux = aux->next[cuv[i] - 'a'];
		else
		{
			printf("0\n");
			return;
		}
	printf("%d\n", aux->v);
}

void writep(char* cuv)
{
	trie *aux = new trie;
	aux = t;
	
	int cont = 0, mx = 0;
	for (int i = 0; i < (int)strlen(cuv) - 1; ++i)
	{
		++cont;
		if (aux->fiu[cuv[i] - 'a'] == true)
			aux = aux->next[cuv[i] - 'a'];
		else
			break;
		
		if (aux->p > 0)
			mx = cont;
	}
	printf("%d\n", mx);
}