import tango.io.Stdout;
import tango.io.Console;
import tango.io.stream.Lines;

int main(){
        //Stdout("Hello World").newline;
        //Stdout.format("Witaj {}", 101);
        //auto s = Cin.get();
        //int x = 5;
        //Cout("Wartosc s:")(s).newline;

        //foreach(line; new LineIterator!(char)(Cin.stream));
        //auto line = Cin.copyln();

        int tab[256];
        int i=0;
        int j=0;
        char z = 0;

        for(i=0; i<255; i++){
                tab[i] = 0;
        }

        foreach(line; new Lines!(char)(Cin.stream)){
                for(i=0; i<255; i++){
                        for(j=0; j<4; j++){
                                if(line[j] == '\0') break;
                                if(line[j] == i) tab[i]++;
                        }
                }

                for(i=0; i<255; i++){
                        if(tab[i] != 0){
                                z = i;
                                Stdout(tab[i]);
                                Stdout(z).newline;
                        }
                        tab[i] = 0;
                }

                //Stdout(cast(char[])line).newline;
                if(line == ".") break;
        }

        return 0;

}