Преобразовать текст: слова на четных местах переписать в обратном порядке, на нечетных - укоротить до 4-х символов

int main(int argc, char** argv) {
    setlocale(LC_ALL, "rus");
    string a = ("TuT bil Kot kotoriy sozdal PotoP sredi chelovekovhc");
    reverse(a.begin(), a.end());
    cout << a <<endl;
    system("pause");
    return 0;
}

#include <iostream>
#include <string>
#include <cctype>
#define isdelim(c) (std::isspace((c)) || std::ispunct((c)))
 
std::string& rev_del(std::string& s){
    size_t p = 0;
    std::string::size_type j, i, k, m, n = s.length();
    for(i = j = 0; i < n; ){
        if(!isdelim(s[i])){
            k = i + 1;
            while((k < n) && !isdelim(s[k]))
                ++k;
 
            if(++p & 1){ //если слово нечётное укоротить до 4-ёх символов
                m = ((k - i) > 4) ? i + 4 : k;
                while(i < m)
                    s[j++] = s[i++];
                i = k;
            } else {
                m = j;
                while(i < k)
                    s[j++] = s[i++];
                //записываем слово задом наперёд
                for(k = m, m = j - 1; k < m; ++k, --m)
                    std::swap(s[k], s[m]);
            }
        } else
            s[j++] = s[i++];
    }
 
    if(j < n)
        s.erase(s.begin() + j, s.end());
    return s;
}
 
int main(void){
    std::string s = "FORTH, JAVA, COBOL, GO, FORTRAN PERL!!! HASKELL";
    std::cout << rev_del(s) << std::endl;
    std::cin.get();
    return 0;
}