#include <fstream>
#include <cstring>

using namespace std;

int main()
{
    char s[101],sep[]=".,;:!? ",a[100][100],*p;
    int n,i,suml;
    ifstream fin("text.in");
    ofstream fout("text.out");
    fin.getline(s,100);
    p=strtok(s,sep);
    n=0;
     while(p)
     {
         strcpy(a[n],p);
         n++;
         p=strtok(NULL,sep);
     }
     suml=0;
    for(i=0;i<n;i++)
         suml=suml+strlen(a[i]);
    fout<<suml/n;
    return 0;
}