[pbInfo] detdrum

#include <fstream>

using namespace std;

ifstream fin("detdrum.in");
ofstream fout("detdrum.out");

int n, a[105], sol[105], aux[105], c, k;

void Citire()
{
    fin >> n >> k;
    for(int i = 1; i <= n; i++)
        fin >> a[i];
}

void Rezolvare(int b)
{
    if(a[b]) Rezolvare(a[b]);
    aux[++c] = b;
}

int main()
{
    int i, j;
    Citire();
    Rezolvare(k);
    j = 1;
    for(i = c; i > 0 && j <= c; i--)
        sol[j++] = aux[i];
    for(i = 1; i <= c; i++)
        fout << sol[i] << " ";
    return 0;
}