#include <iostream>
#include <cstring>
#include <fstream>
using namespace std;
ifstream f("text.in");
ofstream g("text.out");
char a[1000];
int i,n,k;
int main()
{   f.get(a,1000);
    n=strlen(a)-1;
    for(i=0;i<=n;i++)
    if(a[i]!=' '&&a[i]!=','&&a[i]!='.'&&a[i]!='?'&&a[i]!='!')k++;
    char *cuv;int c=0;
    cuv=strtok(a," ,.?!");
    while(cuv)
    {
        c++;
        cuv=strtok(0," ,.?!");

    }
    int medie=k/c;
    g<<medie;
    return 0;
}