Написать программу, которая считывает текст с клавиатуры и выводит его на экран, меняет местами каждые соседние слова - C++ - Ответ 2227684

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
#define MAXWORDS  100
#define MAXTEXT  1000
#define DELIMS  " .,*/:;(){}\"\n\t!?"
 
char *make_format(char *s, char *delims);
char *make_str(char *s, char *fmt,
    char *delims, char **words);
char *gettext(char *, int);
char **permute(char **);
 
int main()
{
    char text[MAXTEXT], *p;
    char *words[MAXWORDS], **w;
    char *format;
 
    while (printf("enter a text:\n") && gettext(text, MAXTEXT)) {
        if ((format = strdup(text)) == NULL) {
            printf("error: cannot allocate memory\n");
            return 1;
        }
        make_format(format, DELIMS);
 
        w = words;
        for (p = strtok(text, DELIMS); 
            p != NULL && w < words + MAXWORDS;
            p = strtok(NULL, DELIMS)) {
                if ((*w++ = strdup(p)) == NULL) {
                    printf("error: cannot allocate memory\n");
                    return 1;
                }
        }
        *w = NULL;
 
        printf("\ntext with the permuted words:\n%s\n",
            make_str(text, format, DELIMS, permute(words)));
 
        for (w = words; *w != NULL; w++)
            free(*w);
        free(format);
    }
    return 0;
}
 
#define swap(t, a, b) { t temp = (a); (a) = (b); (b) = temp; }
 
char **permute(char **w)
{
    int i;
 
    for (i = 0; w[i] != NULL && w[i+1] != NULL; i+= 2)
        swap(char *, w[i], w[i+1]);
    return w;
}
 
char *gettext(char *s, int lim)
{
    int c;
    char *beg = s;
 
    if (lim < 2 || (c = getchar()) == EOF)
        return NULL;
    *s++ = c;
    lim--;
    while ((c = getchar()) != EOF && --lim > 0)
        *s++ = c;
    *s = '\0';
    return beg;
}
 
char *make_format(char *s, char *delims)
{
    char *t, *beg = s;
    int shift;
 
    for ( ; *s != '\0'; s++) {
        if (strchr(delims, *s) != NULL)
            continue;
        for (shift = 0, t = s + 1; 
            strchr(delims, *t) == NULL; t++)
                shift++;
        for (t--; ; t++) {
            *(t - shift) = *t;
            if (*t == '\0')
                break;
        }
    }
    return beg;
}
 
char *make_str(char *s, char *fmt,
    char *delims, char **words)
{
    char *beg = s;
 
    for (*s = '\0'; *fmt != '\0'; fmt++)
        if (strchr(delims, *fmt) == NULL) {
            if (*words != NULL) {
                strcat(s, *words);
                s += strlen(*words++);
            } else {
                strcat(s, fmt);
                return beg;
            }
        } else {
            *s++ = *fmt;
            *s = '\0';
        }
    return beg;
}