noname30

#include <bits/stdc++.h>
using namespace std;
#define sz(x) (x).size()
#define iFOR(i, a, b) for(int i=(a); i<=(b); i++)

int main()
{
    string s; map<char, int> m;
    getline(cin, s);
    for(int i=0; i<sz(s); m[s[i++]]++)
        if(s[i]>='A'&&s[i]<='Z')
            cout<<s[i];
    cout<<'\n';
    iFOR(i, 'A', 'Z') if(m[i]) cout<<char(i)<<m[i];
}