Cod sursa(job #45052)

Utilizator mariaciPopa Marius Ionut mariaci Data 31 martie 2007 23:17:10
Problema Text Scor 30
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 kb
#include<stdio.h>
#include<string.h>
char a[3000];
int main()
{ FILE *f=fopen("text.in","r");
  fgets(a,3000,f);
  int s=0,c=0;
  char *p;
  p=strtok(a,"-,.;@#$%^&*():?! ");
  if(p)
    { s=s+strlen(p);
      c++;
    }
  while(p)
    { p=strtok(NULL,"-,.;@#$%^&*() :?!");
      if(p)
	{ s=s+strlen(p);
	  c++;
	}
    }
  FILE *g=fopen("text.out","w");
  fprintf(g,"%d",s/c);
  fclose(f);
  fclose(g);
  return 0;
}