Cod sursa(job #355769)

Utilizator eu93Marian S eu93 Data 12 octombrie 2009 09:10:55
Problema Text Scor 50
Compilator cpp Status done
Runda CNRV #2 Marime 0.35 kb
Raporteaza aceasta sursa 
#include <stdio.h>
#include <ctype.h>
int main()
{ char c;
int k=0,s=0,p=0;
FILE *f=fopen("text.in","r");
FILE *g=fopen ("text.out","w");
fscanf (f,"%c",&c);
while (!feof(f)) { 
	if (c==' ') p++; 
	else if (isalpha(c)) k++;  
	else {s+=k;k=0; }
	fscanf (f,"%c",&c);
}
s=s/(p+1);
fprintf (g,"%d",s);
fclose (f);
fclose (g);
return 0;
}