#include <iostream>
#include <fstream>
#include <cstring>
using namespace std;
ifstream fin("text.in");
ofstream fout("text.out");
char s[1000000001];
unsigned long long bec,lg,lgt,nr,m,i,n;
int litera(char x)
{
    if((x>='a'&& x<='z') || (x>='A' && x<='Z'))
        return 1;
    return 0;
}
int main()
{
    fin.getline(s,1000000000);
    n=strlen(s);
    for(i=0; i<n; i++)
    {
        if(litera(s[i]))
        {
            bec=1;
            lg++;
        }
        else if(bec==1)
        {
            nr++;
            lgt+=lg;
            bec=0;
            lg=0;
        }
    }
    if(lg>0)
    {
        lgt+=lg;
        nr++;
    }
    if(!nr || !lgt)
    {
        fout<<0;
        return 0;
    }
    unsigned long long m=lgt/nr;
    fout<<m;
    return 0;
}