Cod sursa(job #129072)

Utilizator drywaterLazar Vlad drywater Data 28 ianuarie 2008 16:35:29
Problema Text Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include <stdio.h>
#include <string.h>
FILE *in,*o;
char s[10000],sep[]=", .?/!;\-'",*a;
int n,nr,nrc,l,i,se,j,r;
void main()
{
in=fopen("text.in","r");
o=fopen("text.out","w");
fgets(s,10000,in);
n=strlen(s);
for (i=0;i<n;i++)
 {
 if (s[i]<='z' && s[i]>='a' || s[i]<='Z' && s[i]>='A')
  nr++;
 }

a=strtok(s,sep);
if (a!=NULL)
 nrc++;
while (a!=NULL)
 {nrc++;
 a=strtok(NULL,sep);
 }
nrc--;
r=nr/nrc;
fprintf(o,"%d",r);
fclose(in);
fclose(o);
}