Линейный список, выравнивание текста по центру

#include <stdio.h>
#include <string.h>
#include <alloc.h>
#include<conio.h>
#define n 15
typedef struct list {
char word[80];
struct list *next;
} LIST;
int i,a[100];
 
LIST * read_list(LIST *lst)
{
    LIST *p;
    FILE *f;
    int k;
    f=fopen("f:\\1\\bc\\bin\\1.txt","r");
    if (!feof(f))
    {
        i=1;
        a[1]=0;
        lst=(LIST*)malloc(sizeof(LIST));
        p=lst;
        while(1)
        {
            fscanf(f,"%s",&p->word);
            if(p->word=="\n");{
            i++;a[i]=0;}
            a[i]=a[i]+strlen(p->word);
            if (!feof(f))
            {
                p->next=(LIST*)malloc(sizeof(LIST));
                p=p->next;
            }
            else break;
 
        }
        p->next=NULL;
    }
    else printf("File pustoi\n");
    fclose(f);
    return lst;
}
 
 
 
void main()
{
clrscr();
LIST *lst;
int k;
read_list(lst);
printf("%d\n",i);
for(k=1;k<=i;k++)
printf("%d\n",a[k]);
}

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
typedef struct Node Node;
 
typedef struct Node
{
    char word[80];
    char type;
    int len;
    Node *next;
} Node;
 
typedef struct
{
    Node *first;
    Node *last;
} Words;
 
void scan_words(Words *words, char *filename)
{
    Node *new_elem;
    Node *paragraph;
    Node *end;
    char buffer[1024];
    char word[80];
    char c;
    int len;
    int i, j, k;
 
    FILE *fin;
 
    if ((fin = fopen(filename, "r")) == NULL)
    {
        printf("Error opening file!\n");
 
        exit(-1);
    }
 
    while (!feof(fin))
    {
        i = 0;
 
        while ((c = fgetc(fin)) != '\n' && !feof(fin))
            buffer[i++] = c;
 
        buffer[i] = '\0';
 
        i = 0;
 
        while (buffer[i] != '\0')
        {
            j = i;
 
            while (buffer[j] != ' ' && buffer[j] != '\0')
                ++j;
 
            for (k = i; k < j; ++k)
                word[k - i] = buffer[k];
 
            word[k - i] = '\0';
 
            len = strlen(word);
 
            new_elem = (Node *)malloc(sizeof(Node));
            new_elem->next = NULL;
 
            if (words->first == NULL)
            {
                words->first = new_elem;
                words->last = new_elem;
            }
            else
            {
                words->last->next = new_elem;
                words->last = new_elem;
            }
 
            strcpy(new_elem->word, word);
            new_elem->len = len;
            new_elem->type = 'w';
 
            i = j + 1;
 
            if (buffer[j] == '\0')
                break;
        }
 
        paragraph = (Node *)malloc(sizeof(Node));
        strcpy(paragraph->word, "\n\n");
        paragraph->type = 'p';
 
        words->last->next = paragraph;
        words->last = paragraph;
    }
 
    end = (Node *)malloc(sizeof(Node *));
    end->type = 'e';
 
    words->last->next = end;
    words->last = end;
 
    fclose(fin);
}
 
void print_words(Words *words)
{
    Node *first = words->first;
    Node *next_elem;
    Node *prev_element = words->first;
 
    while (first->type != 'e')
    {
        printf("%s", first->word);
 
        next_elem = first->next;
 
        if (next_elem->type != 'p' && prev_element->type != 'p')
            printf(" ");
 
        first = first->next;
        prev_element = first;
    }
}
 
void delete_words(Words *words)
{
    Node *first = words->first;
    Node *temp;
 
    while (first != NULL)
    {
        temp = first;
        first = first->next;
 
        free(temp);
    }
}
 
int main()
{
    Words words;
 
    words.first = NULL;
    words.last = NULL;
 
    scan_words(&words, "1.txt");
    print_words(&words);
    delete_words(&words);
 
    return 0;
}