#include <iostream>
#include <fstream>
#include <unordered_map>
using namespace std;
int n;
char s[1001];
ifstream fin("trie.in");
ofstream fout("trie.out");
struct Trie
{
    bool endOfWord;
    int aparitii;
    unordered_map <char, int > fr;
    unordered_map <char, Trie* > map;
};
Trie* createNewNode()
{
    Trie* node = new Trie;
    node -> endOfWord = false;
    node -> aparitii = 0;
    return node;
}
void insert(Trie *&root, char *str)
{
    if (root == nullptr)
    {
        root = createNewNode();
    }
    Trie *curr = root;
    while (*str)
    {
        //cout << str << ' ' << curr -> fr[*str] << '\n';
        curr -> fr[*str] ++;
        if (curr -> map.find(*str) == curr -> map.end() || curr == nullptr)
        {
            curr -> map[*str] = createNewNode();
        }
        curr = curr -> map[*str];
        str ++;
    }
    if (curr == nullptr)
    {
        curr = createNewNode();
    }
    
    curr -> aparitii ++;
    curr -> fr[*str]++;
    curr -> endOfWord = true;
}
bool hasChildren(Trie *curr)
{
    for (auto it: curr -> map)
    {
        if (it.second != nullptr)
        {
            return true;
        }
    }
    return false;
}
int search(Trie *curr, char *str)
{
    if (curr == nullptr)
    {
        return 0;
    }
    while (*str)
    {
        //cout << *str << '\n';
        curr = curr -> map[*str];
        if (curr == nullptr) 
        {
            return 0;
        }
        str ++;
    }
    return curr -> aparitii;
}
void scadere_frecventa(Trie *&curr, char *str)
{
    while (*str)
    {
        curr -> fr[*str] --;
        curr = curr -> map[*str];
        if (curr == nullptr) 
        {
            return;
        }
        str ++;
    }
}
bool delete_node(Trie *&curr, char *str)
{
    if (curr == nullptr)
    {
        return false; 
    }
    if (*str)
    {
        curr -> fr[*str] --;
        if (curr != nullptr && curr -> endOfWord == false && curr -> map.find(*str) != curr -> map.end() && delete_node(curr -> map[*str], str + 1))
        {
            if (!hasChildren(curr))
            {
                delete curr;
                curr = nullptr;
                return true;
            }
            else
            {
                return false;
            }
        }
        else
        {
            return false;
        }
    }
    if (*str == '\0' && curr ->endOfWord == true)
    {
        if (!hasChildren(curr))
        {
            delete curr;
            curr = nullptr;
            return true;
        }
        else
        {
            curr -> endOfWord = false;
            return false;
        }
    }
    return false;
}
int longest_prefix(Trie *curr, char *str)
{
    if (curr == nullptr)
    {
        return 0;
    }
    int maxim = 0, lung = 1;
    while (*str)
    {
        //cout << *str << '\n';
        if (curr == nullptr)
        {
            return maxim;
        }
        if (curr -> fr[*str] >= 1)
        {
            maxim = lung;
        }
        curr = curr -> map[*str];
        lung ++;
        str ++;
    }
    return maxim;
}
int main()
{
    Trie* root = nullptr;
    int op;
    int n; 
    while (fin >> op >> s)
    {   
        if (op == 0)
        {
            insert(root, s);
        }
        else if (op == 1)
        {
            delete_node(root, s);
        }
        else if (op == 2)
        {
            fout << search(root, s) << '\n';
        }
        else if (op == 3)
        {
            fout << longest_prefix(root, s) << '\n';
        }
    }
}