Как можно перевести этот код с паскаля в с++? - C++ - Ответ 9032692

#include <iostream>
using namespace std;
 
 
 
int main()
{
    int i, j, k, n;
    bool wper[20];
    char sled[20], pred[20], blok[20];
 
 
    j = 1;
    while (j != 0) {
        cout << "( ";
        for (i = j; i < n; i++) {
            if (blok[i] == j) {
                cout << i << " ";
            }
        }
 
        j = sled[j];
        cout << endl;
        cout << "n=";
        cin >> n; //Количество элементов множества
 
        for (int i = 1; i < n; i++) {
            blok[i] = 1;
            wper[i] = true;
        }
        sled[1] = 0;
        for (int i = 1; i < n; i++) {
            cout << i;
        }
        j = n;
        while (j > 1) {
 
            k = blok[j];
            if (wper[j] == true) {
                if (sled[k] == 0) {
                    sled[k] = j;
                    pred[j] = k;
                    sled[j] = 0;
                }
                else if (sled[k] > j) {
                    pred[j] = k;
                    sled[j] = sled[k];
                    pred[sled[j]] = j;
                    sled[k] = j;
                    blok[j] = sled[k];
                }
 
                else if (wper[j] == false) {
                    blok[j] = pred[k];
                }
                if (k == j) {
                    if (sled[k] == 0) {
                        sled[pred[k]] = 0;
                    }
                    else {
                        sled[pred[k]] = sled[k];
                        pred[sled[k]] = pred[k];
                    }
                    for (int i = 0; i < n; i++) {
                        cout << sled[i] << pred[i] << blok[i] << wper[i];
                    }
                }
            }
        }
        j = n;
        while (j > 1) {
            while ((wper[j] && (blok[j] = j)) || (!wper[j] && (blok[j] = 1)))
            {
                wper[j] = !wper[j];
                j--;
            }
        }
    }
    system("pause");
    return 0;
}