Cod sursa(job #356232)

Utilizator vladutzdudevlad ungureanu vladutzdude Data 13 octombrie 2009 21:44:08
Problema Text Scor 80
Compilator cpp Status done
Runda CNRV #2 Marime 0.38 kb
 #include <stdio.h>
#include <ctype.h>
int main()
{ char c;
int k=0,s=0,p=0,ok=1;
FILE *f=fopen("text.in","r");
FILE *g=fopen ("text.out","w");
fscanf (f,"%c",&c);
while (!feof(f)) { 
if (isalpha(c) && ok==1) {k++; p++; ok=0;}
    else if(isalpha(c)) k++; 
else {s+=k;k=0; ok=1; }
fscanf (f,"%c",&c);
}
s=s/p;
fprintf (g,"%d",s);
fclose (f);
fclose (g);
return 0;
}