Cod sursa(job #112027)

Utilizator BuniakovskiNeguletu Octavian Buniakovski Data 2 decembrie 2007 20:02:43
Problema Text Scor 50
Compilator c Status done
Runda Arhiva de probleme Marime 1.11 kb
/* Se da un text intr-un fisier,de max 1Mb,si se cere afisarea lungimii
   medii a cuvintelor din text.Lungimea medie inseamna partea intreaga
   a raportului dintre  nr total al caracterelor din toate cuvintele
   si nr cuvintelor


   Ex: - Lasa-ma in pace, ca am invatat azi noapte toata ziua.
       Se va afisa in fisier :[11/41];

       Viteza de executie:0.1 sec
   */


#include <stdio.h>

char ch;
long int i;
FILE *f;
FILE *g;
enum sep {sp=' ',vg=',',pct='.',pctv=';',lin='-'};

int ver_sep(char ch){
   int ok;
  char i;

  ok=0;
  for (i=sp;i<=lin;i++)
  if (ch==i)
  {
   ok=1;
   break;
  }
return(ok);
}
int main(void){
  int ok;
 long int nr_car;
  long int cuv;
  long int deja;

  f=fopen("text.in","r");
  g=fopen("text.out","w");
  ok=0;
  nr_car=0;
  cuv=0;
  deja=0;
  while ((ch=fgetc(f))!=EOF)
  {
    if (ver_sep(ch)==1)
    {
     if (ok==1)
     if (deja==0)
     {
      cuv++;
      deja=1;
     }
    }
    else
    {
     ok=1;
     deja=0;
     nr_car++;
    }
  }

fprintf(g,"%d",nr_car/cuv);
fclose(g);
return(0);
}