Функция, которая считает количество слов палиндромов

#include <iostream>
#include <cctype>
#define isdelim(c) (std::isspace((c)) || std::ispunct((c)))
bool is_poli(const char* s, size_t n);
size_t count_poli(const char* s);
 
int main(void){
    char s[] = "KAZAK, perl, WOW, XyyX, java 7ADA7";
    std::cout << "count: " << count_poli(s) << std::endl;
    std::cin.get();
    return 0;
}
 
//кол-во палиндромов
size_t count_poli(const char* s){
    size_t k = 0, i = 0;
    do {
        if(*s && !isdelim(*s))
            ++i;
        else if(i > 0){
            if(is_poli(s - i, i))
                ++k;
            i = 0;
        }
    } while(*s++ != '\0');
    return k;
}
 
//проверка на палиндром
bool is_poli(const char* s, size_t n){
    const size_t m = n / 2;
    for(size_t i = 0; i < m; ++i){
        if(s[i] != s[n - 1 - i])
            return false;
    }
    return true;
}

#include <bits/stdc++.h>
 
using namespace std;
 
int main()
{
    string str, s;
    cout << "Enter a string [ENG]:" << "\n";
    getline(cin, str);
    str += " ";
    int k = 0;
    for (int i = 0; i < str.size(); i++) {
        s += str[i];
        if (!(isalpha(str[i]))) {
            s.pop_back();
            if (s != "")
                if (s == string(s.rbegin(), s.rend()))
                    k++;
            s = "";
        }
    }
    cout << "Target quantity: " << k << "\n";
    system("pause");
    return 0;
}

#include <iostream>
 
using namespace std;
 
int slov_kol(char *str)
   {
     int kol_slov=0;
     char *p,t[32];
 
     p = strtok(str, ", ");
     strcpy(t,p);
     if(strcmp(t,strrev(p))==0)
          kol_slov++;
     do {
          p = strtok('\0', ", ");
          if(p)
            {
               strcpy(t,p);
               if(strcmp(t,strrev(p))==0)
               kol_slov++;
             }
      } while(p);
 
      return kol_slov;
    }
 
int main()
{
  char s[256]="KAZAK, perl, WOW, XyyX, java 7ADA7";
 
  cout<< slov_kol(s);
  system("pause>NULL");
  return 0;
}