Cod sursa(job #39922)

Utilizator mihneaCCatutii Mihnea mihneaC Data 27 martie 2007 09:19:44
Problema Text Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
Raporteaza aceasta sursa 
#include<fstream.h>
#include<string.h>
#include<ctype.h>
void main()
{
char s[60000];
fstream f("text.in",ios::in);
long nrl=0;
long nr=0,i;
while(!f.eof())
 {
  f>>s;
  if(s[0]!='-')
	  {for(i=0;i<strlen(s);i++)
		if(isalpha(s[i]))
		   nrl++;
	  nr++;
	  if(strchr(s,'-'))

		   nr++;
	  }
  }

cout<<nrl<<" "<<nr<<" "<<nrl/nr;
}