last

#include <stdio.h>
#include <string.h>
#include <stdlib.h>

#define SIMV "!@#$%^&*():\";'/.,<>?\\0123456789\n\r- "

struct slova {
    char word[40];
};

int conc(slova*, char*, int);
char caseup(char);
void swap(slova *&, int, int);
void sort(slova *&, int);
void print(slova *, int);

int main() {
    slova *slovar;
    FILE *h; int fsize,i,n=0;
    char *str, *pch;

    //open-file
    h=fopen("a.txt","r");
    if(!h) return 0;

    //file-size
    fseek(h,0,SEEK_END);
    fsize=ftell(h);
    rewind(h);

    //read-file
    str=(char*)malloc(sizeof(char)*fsize);
    fread(str,sizeof(char),fsize,h);
    str[fsize]='\0';

    //close-file
    fclose(h);

    //case-up
    for(i=0;i<fsize;i++) str[i]=caseup(str[i]);

    //del-symb + create-slovar
    pch=strtok(str,SIMV);
    slovar=(slova*)calloc(1,sizeof(slova));
    while(pch) {
        if(!conc(slovar,pch,n)) { //del-conc
        strcpy(slovar[n++].word,pch); //slovar <- str
        slovar=(slova*)realloc(slovar,(n+1)*sizeof(slova)); //slovar[+1]
        }
        pch=strtok(NULL,SIMV); //next-word
    }

    //print
    sort(slovar,n);
    print(slovar,n);

    return 0;
}

int conc(slova* slovar, char* pch, int n) {
    for(int i=0;i<n;i++) if(strcmp(slovar[i].word,pch)==0) return 1;
    return 0;
}

char caseup(char u) {
    if(u<='z' && u>='a') return u-32;
    return u;
}

void swap(slova *& slovar, int x, int y) {
    slova temp;
    temp=slovar[x];
    slovar[x]=slovar[y];
    slovar[y]=temp;
}

void sort(slova *& slovar, int n) {
    int max;
    for(int j=0;j<n;j++) {
        max=j;
        for(int i=j;i<n;i++) {
            if(slovar[max].word<slovar[i].word) max=i;
        }
        swap(slovar,max,j);
    }
}

void print(slova * slovar, int n) {
    for(int i=0;i<n;i++) printf("[%3d]%20s\n",i,slovar[i].word);

}