Cod sursa(job #1468568)

Utilizator BanhidiBanhidi Zoltan Banhidi Data 6 august 2015 13:24:17
Problema Text Scor 40
Compilator c Status done
Runda Arhiva de probleme Marime 0.83 kb
#include <stdio.h>

int litera(char z) {
    return((z>='A' && z<='Z') || (z>='a' && z<='z'));
}

int main() {
    FILE *f=fopen("text.in","r");
    if (f==NULL) {
        printf("Eroare deschidere fisier.");
        fflush(stdin); getchar();
    }
    else {
        char c;
        long nr=0,l=0;
        fscanf(f,"%c",&c);
        do {
            while (!litera(c) && c!='\n') fscanf(f,"%c",&c);
            if (c!='\n') {
                nr++;
                while (litera(c)) {
                    l++;
                    fscanf(f,"%c",&c);
                }
            }
        } while (c!='\n');
        fclose(f);
        f=fopen("text.out","w");
        fprintf(f,"%ld",(int) l/nr);
        fclose(f);
        printf("Lungime totala a cuvintelor: %ld\nNumar cuvinte: %ld",l,nr);
    }
    return(0);
}