Cod sursa(job #182391)

Utilizator emy2704S Octav emy2704 Data 20 aprilie 2008 20:32:11
Problema Text Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.56 kb
 #include<string.h>     
 #include<stdio.h>     
 int main()     
 {     
 char s[1000000],sr[]=" 1234567890-=`~!@#$%^&*()_+;:[]{}'<>,.?/|\"",*p;     
 long n=0,k=0,x;     
 long i=1;     
 s[0]='1';     
 FILE *fin,*fout;     
 fin=fopen("text.in","r");     
 for (i=1;!EOF(fin);i++)     
 fscanf(fin,"%c",&s[i]);     
 p=strtok(s,sr);     
 while(p!=NULL)
	{
	if(p) {n++;
	k+=strlen(p);}
	p=strtok(NULL,sr);
	}     
 x=k/n;     
 fout=fopen("text.out","w");     
 fprintf(fout,"%ld",x);     
 fclose(fin);     
 fclose(fout);     
 return 0;     
}