Cod sursa(job #39924)
Utilizator | Data | 27 martie 2007 09:22:37 | |
---|---|---|---|
Problema | Text | Scor | 0 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.38 kb |
#include<fstream.h>
#include<string.h>
#include<ctype.h>
int main()
{
char s[60000];
fstream f("text.in",ios::in);
fstream g("text.out",ios::out);
long nrl=0;
long nr=0,i;
while(!f.eof())
{
f>>s;
if(s[0]!='-')
{for(i=0;i<strlen(s);i++)
if(isalpha(s[i]))
nrl++;
nr++;
if(strchr(s,'-'))
nr++;
}
}
g<<nrl/nr;
g.close();
return 0;
}