Cod sursa(job #1468577)

Utilizator BanhidiBanhidi Zoltan Banhidi Data 6 august 2015 13:40:32
Problema Text Scor 40
Compilator c Status done
Runda Arhiva de probleme Marime 0.8 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");
        if (nr==0 || l==0) fprintf(f,"0");
        else fprintf(f,"%ld",(long) l/nr);
        fclose(f);
    }
    return(0);
}