Cod sursa(job #133314)

Utilizator xtephanFodor Stefan xtephan Data 8 februarie 2008 10:50:38
Problema Text Scor 70
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, ante;

	fscanf(f, "%c", &ante);


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

		if(isalpha(ch))
			lit++;
		else {
			if(isalpha(ante))
				cuv++;
		}

		ante=ch;
	}

	if(isalpha(ante))
		cuv++;
}


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

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

	fclose(g);
}