#include <iostream>

using namespace std;

int main()
{
    int n=0,c=0,N=0,s=0,q=0,b[26];
    char a[100],h;
    char alfavit[100];
    cin.getline(a,100);
    while(s!=n){
        if(a[c]>='a'&&a[c]<='z'){a[c]=a[c]-32;}
        s++;
        c++;
    }
    c=0;
    n='a'-'z'+1;
    cout<<1;
    h='A';
   while(h!='Z'){
        alfavit[q]=h;
        h++;
        q++;
  }
  if(h='Z'){alfavit[q]=h;}
    c=0;
    s=0;
    n='a'-'z'+1;
    //К етому моменту все ок а дальше краш все провыерено с помощю сиаутов
    //но почему я все проверил?
    cout<<n<<s;
    while(s!=26){

        b[s]=0;
        s++;
    }
     c=0;
    cout<<4;
     while(a[c]!=0){
            cout<<5;
            N=a[c]-'A';
            b[N]++;
    c++;
}
N=0;
c=0;
while(n!=0){
    cout<<a[c]<<"-"<<b[N];
    c++;
    N++;
    n--;
}



}