Pagini recente » Rating Cristi Tanase (Cristi_2006) | Cod sursa (job #1274051) | Cod sursa (job #228328) | Cod sursa (job #229364) | Cod sursa (job #133312)
Cod sursa(job #133312)
/*
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);
fscanf(f, "%c", &ch);
while(!feof(f)) {
if(isalpha(ch))
lit++;
else {
if(isalpha(ante))
cuv++;
}
ante=ch;
fscanf(f, "%c", &ch);
}
if(isalpha(ante))
cuv++;
}
void afis() {
long rez;
FILE *g=fopen("text.out", "w");
rez=lit/cuv;
fprintf(g,"%ld", rez);
fclose(g);
}