Ошибка «Нарушение прав доступа при чтении по адресу»

#define _CRT_SECURE_NO_WARNINGS
#include <iostream>
 
 
int main() {
 
  setlocale(LC_ALL, ".RUSSIAN");
 
  while (1) {
 
    char arr[81]{};
    char arr1[81]{};
    char arr2[81]{};
    char arr3[81]{};
    char arr4[81]{};
    char arr44[81]{};
    char arr7[81]{};
    int n = 0;
    char* St;
 
    std::cout << "Enter the text:\n";
    gets_s(arr);
    strcpy(arr3, arr);
    std::cout << "\n";
 
    std::cout << "Enter the given substring:\n";
    gets_s(arr1);
    int k = strlen(arr1);
    std::cout << "\n";
 
    std::cout << "Enter a symbol which you want to paste:\n";
    gets_s(arr2);
    strcpy(arr7, arr2);
 
      int q = strlen(arr);
      St = strstr(arr, arr1);
      if (strstr(arr, arr1) != 0) {
        if (St) {
          *St = 0;
          St += k;
        }
 
        if (St  *St == ' ') {
          strcat(arr2, St);
          int f = strlen(arr2);
          int b = q - f + 1;
 
          for (int i = 0; i < b; i++) {
            arr4[i] = arr3[i];
          }
 
          strcat(arr4, arr2);
          n++;
        }
        while (St  *St != ' ') {
        
          St = strstr(St, arr1);
          St += k;
          if (St  *St == ' ') {
            strcat(arr2, St);
            
              int f = strlen(arr2);
              int b = q - f + 1;
 
              for (int i = 0; i < b; i++) {
                arr4[i] = arr3[i];
              }
 
              strcat(arr4, arr2);
            
          }
        }
 
        strcpy(arr, arr2);
      }
      while (St  strstr(arr, arr1) != 0) {
      int q = strlen(arr4);
      St = strstr(arr, arr1);
 
      if (St) {
        *St = 0;
        St += k;
      }
 
      if (St  *St == ' ') {
        strcpy(arr2, arr7);
        strcat(arr2, St);
        int f = strlen(arr2);
        int b = q - f + 1;
 
        for (int i = 0; i < 81; i++) {
          arr44[i] = 0;
        }
        n++;
        strncpy(arr44, arr4, b);
        strcat(arr44, arr2);
      }
 
      else if (St  *St != ' ') {
 
        while (St  *St != ' ') {
 
          St = strstr(St, arr1);
 
          St += k;
 
          if (St  *St == ' ') {
            strcpy(arr2, arr7);
            strcat(arr2, St);
            int f = strlen(arr2);
            int b = q - f + 1;
            for (int i = 0; i < 81; i++) {
              arr44[i] = 0;
            }
            
            strncpy(arr44, arr4, b);
            strcat(arr44, arr2);
          }
        }
        }
      strcpy(arr, arr2);
      strcpy(arr4, arr44);
    }
    /*if (*(strstr(arr, arr1) + k - 1) == arr4[q]) {
      strcat(arr4, arr7);
    }*/
    q = 0;
    q = strlen(arr4);
    std::cout << "\n";
    std::cout << "Result:\n";
 
    if (n > 0) {
      for (int i = 0; i < q; i++) {
        std::cout << arr4[i];
      }
    }
    else if (n == 0) {
      std::cout << "There are no words in the text that end with the given substring.\n";
    }
    else {
      for (int i = 0; i < q; i++) {
        std::cout << arr[i];
      }
    }
    std::cout << "\n\n";
      system("pause");
      system("cls");
  }
    return 0;
}