Cod sursa(job #133325)

Utilizator xtephanFodor Stefan xtephan Data 8 februarie 2008 11:24:11
Problema Text Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.59 kb
/*
text
infoarena
*/
#include<stdio.h>
#include<ctype.h>
#include<string.h>


long cuv, lit;
FILE *f;


void rez();
void afis();


int main() {

	f=fopen("text.in", "r");

	rez();
	afis();

	fclose(f);

	return 0;
}


void rez() {

	char ch;
	int g=1; /*gasit cuvant*/


	while(fscanf(f, "%c", &ch) != EOF) {

		if(isalpha(ch)) {
			lit++;
			g=0;

		} else {
			if(!g) {
				cuv++;
				g=1;
			}
		}

	}

	if(!g)
		cuv++;
}


void afis() {
	long rez;
	FILE *g=fopen("text.out", "w");

	rez=lit/cuv;
	fprintf(g,"%ld", rez);

	fclose(g);
}