Cod sursa(job #71476)

Utilizator M@2Te4iMatei Misarca M@2Te4i Data 10 iulie 2007 18:25:52
Problema Text Scor 70
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.49 kb
#include<stdio.h>
#include<string.h>

long c,l,o;

int main()
{
freopen("text.in","r",stdin);
c=l=o=0;
char s[1024];
while (!feof(stdin))
{
fgets(s,1024,stdin);
if(s[strlen(s)-1]=='\n') s[strlen(s)-1]=0;
char *p;
for(p=strtok(s," `~1234567890!{@#$%^&*()-}|:+?=><,./;'[]"); p; p=strtok(NULL," `~1234567890!{@#$%^&**()-}|:+?=><,./;'[]"))
     {
     ++c;
     l+=strlen(p);
     }
}
freopen("text.out","w",stdout);
printf("%ld",l/c);
fclose(stdin);
fclose(stdout);
return 0;
}