#include <iostream>
#include <fstream>
#include <iomanip>
#include <cmath>
using namespace std;

void Skaitymas ( char S[], int K[], int & n, int & k);
void Skaiciavimas ( char S[], int K[], int n, int k, int & raides, int & skaiciai, int & tarpai, int & kiti);
int main()
{
    char S[50];
    int K[50];
    int n,k,raides,skaiciai,tarpai,kiti;
    Skaitymas (S,K,n,k);
    Skaiciavimas (S,K,n,k,raides,skaiciai,tarpai,kiti);
    cout << raides << endl;
    cout << skaiciai << endl;
    cout << tarpai << endl;
    cout << kiti << endl;
    return 0;
}

void Skaitymas ( char S[], int K[], int & n, int & k)
{
    ifstream fd ("Duomenys.txt");
    n = 0;
    k = 0;
    char simb;
    for (char i = 'a'; i <= 'z'; i++)
    {
        S[n] = i;
        K[n] = 0;
        n++;
    }
    for (char i = '0'; i <= '9'; i++)
    {
        S[n] = i;
        K[n] = 0;
        n++;
    }
    S[n] = 'ą';
    K[n] = 0;
    n++;
    S[n] = 'č';
    K[n] = 0;
    n++;
    S[n] = 'ę';
    K[n] = 0;
    n++;
    S[n] = 'ė';
    K[n] = 0;
    n++;
    S[n] = 'į';
    K[n] = 0;
    n++;
    S[n] = 'š';
    K[n] = 0;
    n++;
    S[n] = 'ų';
    K[n] = 0;
    n++;
    S[n] = 'ū';
    K[n] = 0;
    n++;
    S[n] = 'ž';
    K[n] = 0;
    n++;
    S[n] = ' ';
    K[n] = 0;
    n++;
    while (!fd.eof())
    {
        fd >> simb;
        if (!fd.eof())
        {
            k++;
            for (int i = 0; i < n; i++)
                if (tolower(simb)== S[i])
                {
                    K[i]++;
                }
        }
    }

    fd.close();
}
void Skaiciavimas ( char S[], int K[], int n, int k, int & raides, int & skaiciai, int & tarpai, int & kiti)
{
    raides = 0;
    skaiciai  = 0;
    tarpai = 0;
    kiti = 0;
    for ( int i = 0; i < n; i++)
    {
        //cout << S[i] << " ";
        //cout << K[i] << " ";
        for (char j = 'a'; j <= 'z'; j++)
        {


            if (S[i] == j)
            {
                raides = raides + K[i];
            }
        }
        for (char j = '0'; j <= '9'; j++)
        {
            if (S[i] == j)
            {
                skaiciai = skaiciai + K[i];
            }
        }

        if (S[i] == ' ')
        {
            tarpai = tarpai + K[i];
        }
        if (S[i] == 'ą' || S[i] == 'č' || S[i] == 'ę' || S[i] == 'ė' || S[i] == 'į' || S[i] == 'š' || S[i] == 'ų' || S[i] == 'ū' || S[i] == 'ž')
        {
            raides = raides + K[i];
        }
    }
    kiti = k - raides - skaiciai - tarpai;
}