#include <stdio.h>

int x[50], xcod[50], n;

void afis(int y[50])
{
	for(int i=1;i<=n;i++) printf("%i ", y[i]);
	printf("\n");
}

int verificaPermutare()
{
	int i, j, k;
	for(i=1; i<=n; i++) {
		k=0;
		for(j=1;j<=n;j++) if(i == x[j]) k++;
		if(k!=1) {
			printf(" [  ERROR  ]\n");
			return 0;
		}
	}
	printf(" [  OK  ]\n");
	return 1;
}

int citire()
{
	printf("n = ");scanf("%i", &n);
	for( int i=1 ; i<=n ; i++ ) {
		printf("x[%i] = ", i); scanf("%i", &x[i]);
	}
	printf("Verific daca x este permutare ...");
	return verificaPermutare();
}

void XtoXcod() 
{
	int i, j, k;
	for(i=1;i<=n;i++) {
		k=0;
		for(j=1;j<=i;j++) if(x[j]<x[i]) k++;
		xcod[i]=k;
	}
}

void swap(int &a, int &b)
{
	int c;
	c=a;
	a=b;
	b=c;
}

int valid(int k)
{
	int i, c=0;
	for(i=1;i<k;i++) if(x[i]<x[k]) c++;
	if(c==xcod[k]) return 0;
	else return 1;
}

int verifXcod()
{
	printf("Verific daca xcod este permutare ...");
	int i, c;
	for(i=1;i<=n;i++) x[i]=i;
	for( i=n ; i>=1 ; i-- ) {
		c=i;
		while(valid(i) && c>1) {
			swap(x[c], x[i]);
			c--;
			swap(x[c], x[i]);	
		}
		if(c<1) {
			printf(" [  ERROR  ]\n");
			return 0;
		}
	}
	return verificaPermutare();
}

int main()
{
	if(!citire()) return;
	XtoXcod();
	printf("Afisez xcod : \n");
	afis(xcod);
	if(!verifXcod()) return;
	printf("Afisez x : \n");
	afis(x);
}