#include <fstream>
#include <string>

using namespace std;

ifstream fin("text.in");
ofstream fout("text.out");

int s,c,i,ii;
char v[100000000];

void Read()
{fin.getline(v,100000000);
for(ii=1;ii<=100000000,v[ii];ii++);
}
void Rezolva()
{for(i=1;i<=ii;i++)
{if(v[i]=='-' || v[i]==',' || v[i]==' ' || v[i]=='!' || v[i]=='.' || v[i]=='?' )
    {if( v[i-1]!='-' && v[i-1]!=',' && v[i-1]!=' ' && v[i-1]!='!' && v[i-1]!='.' && v[i-1]!='?')
    c++;}
else if( v[i]!='-' && v[i]!=',' && v[i]!=' ' && v[i]!='!' && v[i]!='.' && v[i]!='?')
    s++;
}

}
int main()
{Read();
Rezolva();
fout<<s/c;
    return 0;
}