Cod sursă (job #412058)

#include<fstream>

using namespace std;

ifstream in("bizar.in");
ofstream out("bizar.out");

char s[100005], ch;
int nrelem[100005], v[100005], ind = 1, val = 1;

int main()
{
    in >> v[1];
    nrelem[1] = 1;
    while (in >> ch)
    {
        if (ch == ',' || ch == ' ')
        {
            in >> v[++ind];
            continue;
        }
        if (ch == '(')
        {
            nrelem[++ind] = val;
            val = ind;
            in >> v[ind];
            continue;
        }
        int poz = v[val - 1];
        poz %= ind - val + 1;
        if (poz == 0)
            poz = ind - val + 1;
        ind = val - 1;
        v[ind] = v[ind + poz];
        val = nrelem[val];
    }
    out << v[1];
    return 0;
}