a

#define INF 0
#include <iostream>
using namespace std;

int main()
{
  	int MatrixLen, sum, min = INF, z;
  	cin >> MatrixLen;
  	int matrix[MatrixLen][MatrixLen];
  	int matrixMax[MatrixLen];
	for (int k = 0; k < MatrixLen; k++)
    	for (int i = 0; i < MatrixLen; i++)
    	{
    		matrix[i][k] = INF;
			if(i == k)	matrix[i][k] = 0;
		}


	for (int k = 0 + 1; k < MatrixLen ; k++)
    {
		cin >> z;
		z--;
		matrix[z][k] = 1;
		matrix[k][z] = 1;
	}

    cout << endl << "print mass" << endl;
	for (int k = 0; k < MatrixLen; k++)
	{
		for (int i = 0; i < MatrixLen; i++)
		{
			cout << matrix[i][k] << "\t";
		}
		cout << endl;
	}
	cout << endl << " end print mass" << endl;
    bool massDel[MatrixLen];
    bool e;
    do
    {
		cout << endl << "************************************" << endl;
		e = false;
		for (int k = 0; k < MatrixLen; k++) massDel[k] = false;
	    for (int k = 0; k < MatrixLen; k++)
	    {

			for (int i = 0; i < MatrixLen; i++)
			{
				sum = 0;
				for (int k = 0; k < MatrixLen; k++)
				{
					sum+= matrix[i][k];
				}
				matrixMax[i] = sum;
				if(sum > 1) e = true;
				if(sum == 1) massDel[i] = true;
			}

	    }

	    cout << endl << "print mass" << endl;
		for (int k = 0; k < MatrixLen; k++)
		{
			cout << matrixMax[k] << " " << massDel[k] << endl;
		}
		cout << endl << " end print mass" << endl;
		if(e)
	    {
	    	for (int k = 0; k < MatrixLen; k++)
			{
				if(massDel[k])
				{
					for (int i = 0; i < MatrixLen; i++)
					{
						if(matrix[k][i])
						{
							matrix[k][i] = 0;
							matrix[i][k] = 0;
						}
					}

				}
			}
		}
		cout << endl << "print mass" << endl;
	for (int k = 0; k < MatrixLen; k++)
	{
		for (int i = 0; i < MatrixLen; i++)
		{
			cout << matrix[i][k] << "\t";
		}
		cout << endl;
	}
	cout << endl << " end print mass" << endl;

	} while(e);

}