#include <iostream>

using namespace std;

int main()
{
    char s[256];
    int x[26] = {0};
    cin>>s;
    int i =0;
    while(s[i]!= '\0'){
        x[s[i]-'A']++;
        i++;
    }
    for(int i = 0; i<26;i++)
      if(x[i])
        cout<<"caracterul "<<char (i+'A')<<" apare de "<<x[i]<<" ori \n";
    return 0;
}