Поиск в тексте символов (C++)

//#include "stdafx.h"
#include <stdlib.h>
    // для функции exit()

#include <string.h>
#include <iostream.h>
#include <cstdio>
    // для функций работы с файлами

void main(void) {
    char
        text[149],  // загруженный из файла текст

        *_word, // рабочая переменная для корректного
                // разделения строки на слова

        **words,    // здесь будут храниться все слова из строки

        fourSW[150], // в этом массиве будут храниться слова длиной в 4
                // символа, содержащие буквы и цифры

        **repeatWord;
                // этот массив будет содержать повторяющиеся слова

    words = new char*[150];
    repeatWord = new char*[150];

    int
        i,  //
        j,  // счётчики циклов
        k,  //

        word=0,     // количество слов в загруженной строке

        lengths[150],       // длины каждого слова

        digitPos=0,     // рабочая переменная, которая будет содержать
                    // информацию о словах содержащих цифры

        repeat[150],        // количество повторений для каждого слова

        squares[150][3],    // кубы цифровых слов

        sq=0,           // количество цифровых слов

        repeats=0;      // общее количество различных слов в тексте

    FILE *fp;   // указатель на дескриптор файла

    /* Нижеследующие переменные созданы для показа умения работы со строковыми функциями */
    char text1[9]="Proverka";
    char text2[10]="Propil'on";
    char *p;

    if ((fp = fopen("data.txt", "r")) == NULL) goto fileNotExists;
        // открываем файл, если не удаётся - уходим в ошибку

    fread(&text, sizeof(char), 150, fp);
    cout << "Loaded text: " << text << endl << endl;
    fclose(fp);
        // читаем из файла 150 символов, выводим текст, закрываем файл

    /* следующий блок делит считанную строку на массив слов, с которым
       гораздо удобнее работать */
    do {
        if (word==0) {
            _word = strtok(text, ",");
        } else {
            _word = strtok(NULL, ",");
        }   // для определения каждого последующего слова используется
            // функция strtok()

        if (_word == NULL) break;

        word++;
        words[word] = new char[strlen(_word)];
        words[word] = _word;
        lengths[word] = strlen(_word);
        // заносим слово в массив words[], а его длину - в lengths[]
    } while (1);

    cout << endl << "Words (length = 5) with digits and characters:" << endl;

    strcpy(fourSW, "");
    /* следующий блок кода найдёт все слова, содержащие и буквы и цифры,
       и не имеющие при себе буквы s */
    for (i=1; i<=word; i++) {
        digitPos=strcspn(words, "s");
            // ищем, на какой позиции встречается буква в слове
        if (atoi(words)==0 && digitPos>0 && digitPos!=lengths && lengths==4) {
            strcat(fourSW, words);
            strcat(fourSW, ", ");
        }
    }
    cout << fourSW << endl << endl;
        // выводим найденное

    /* следующие блок кода ищет все повторяющиеся слова в тексте */
    for(i=1; i<=word; i++) {
        for(j=i; j<=word; j++) {
            if (words==words[j]) {
                for(k=1; k<=repeats; k++) {
                    if (0==strcmp(words, repeatWord[k])) {
                        repeat[k]++;
                        goto n1;
                    }
                }
                repeats++;
                repeatWord[repeats] = new char[lengths];
                repeatWord[repeats]=strdup(words);
                repeat[repeats]=1;
            }
        }
    }

n1:
    cout << "Repeat words: " << endl;
    for (i=1; i<=repeats; i++)
        if (repeat>1)
            cout << repeatWord << " [" << repeat << "], ";
        // выводим слова, у которых количество повторений больше единицы

    /* следующий блок кода находит цифровые слова и выводит их кубы */
    cout << endl << endl << "Numeric words, and its squares: " << endl;

    for (i=1; i<=word; i++) {
        for(int j=0; j<lengths; j++)
            if (atoi(&words[j])==0 && words[j]!='0') goto n2;

        sq++;
        squares[sq][1]=atoi(words);
        squares[sq][2]=(atoi(words)*atoi(words)*atoi(words));
n2:
        cout << "";
    }

    for (i=1; i<=sq; i++)
        cout << "Number: " << squares[1] << "; square: " << squares[2] << endl;

    cout << endl << "------------------------------------------" << endl << endl;

    // весь остальной код показывает умение работать со строковыми функциями

    cout << "text1='" << text1 << "';" << endl;
    cout << "text2='" << text2 << "';" << endl;

    p=strstr(text1, "ov");

    cout << "strcmp(text1, text2) = '" << strcmp(text1, text2) << "'" << endl;
    cout << "strncmp(text1, text2, 3) = '" << strncmp(text1, text2, 3) << "'" << endl;
    cout << "strlwr(text1) = '" << strlwr(text1) << "'" << endl;
    cout << "strupr(text2) = '" << strupr(text2) << "'" << endl;
    strrev(text1);  // функция заменяет строку
    cout << "strrev(text1) = '" << text1 << "'" << endl;
    strrev(text1);// возвращаем строку после вывода в исходное состояние
    cout << "strspn(text2, 'ORP') = '" << strspn(text2, "ORP") << "'" << endl;
    cout << "strstr(text1, 'rk') = '" << p << "'" << endl;
    cout << "strchr(text1, 'r') = '" << strchr(text1, 'r') << "'" << endl;
    cout << "strrchr(text1, 'r') = '" << strrchr(text1, 'r') << "'" << endl;

    fp=fopen("output.txt", "w");
    for(i=1; i<word; i++) {
        fwrite(words, sizeof(char), lengths, fp);
        fputs(", ", fp);
    }
    fclose(fp);

    // удаляем все переменные, что мы использовали в процессе
    delete repeatWord, repeats, text1, text2, text, _word, fourSW, words, lengths, digitPos, squares, sq, repeat, fp;

    exit(0);

fileNotExists:
    cout << "File with input data not found" << endl;
}