fazan

#include <bits/stdc++.h>

using namespace std;
ifstream fin("fazan.in");
char C[35][25];
int X[35], P[35], n, m, ok;
void afisare()
{
    ok=1;
    for(int i=1; i<=m; i++)
        cout<<C[X[i]]<<" ";
    cout<<'\n';
}
int fazan(char s1[], char s2[])
{
    int ls=strlen(s1);
    if(s1[ls-2]==s2[0] && s1[ls-1]==s2[1])
        return 1;
    return 0;
}
int valid(int k)
{
 	int sw=1, ok=1;
 	if(k>1)
        ok=fazan(C[X[k-1]],C[X[k]]);
 	for(int j=1;j<k;j++)
 		if(X[j]==X[k])
 			sw=0;
 	return sw && ok;
}
void back(int k)
{
    for(int i=1; i<=n; i++)
        if(!P[i])
        {
            X[k]=i;
            P[i]=1;
            if(valid(k))
                if(k==m)
                    afisare();
                else
                    back(k+1);
            P[i]=0;
        }
}

int main()
{
    cin>>n>>m;
    cin.get();
    for(int i=1; i<=n; i++)
        cin>>C[i];
    for(int i=1; i<n; ++i)
        for(int j=i+1; j<=n; ++j)
            if(strcmp(C[i],C[j])>0)
                swap(C[i],C[j]);
    back(1);
    if(!ok)
        cout<<"IMPOSIBIL";
    return 0;
}
/**
SO
#include <iostream>
using namespace std;
string S[32];
int X[32],n,m,P[32],gasit;

void afisare()
{
    for(int i=1;i<=m;i++)
        cout<<S[X[i]]<<" ";
    cout<<endl;
    gasit=1;
}

int ok(int k)
{
    if(k>1 && S[X[k]].substr(0,2)!=S[X[k-1]].substr(S[X[k-1]].length()-2))
        return 0;
    return 1;
}

void back(int k)
{
    for(int i=1;i<=n;i++)
        if(!P[i])
        {
            X[k]=i;
            P[i]=1;
            if(ok(k))
                if(k==m) afisare();
                else back(k+1);
            P[i]=0;
        }
}

int main()
{
    cin>>n>>m;
    for(int i=1;i<=n;i++)
        cin>>S[i];
    for(int i=1;i<n;i++)
        for(int j=i+1;j<=n;j++)
            if(S[i]>S[j])
                swap(S[i],S[j]);
    back(1);
    if(!gasit) cout<<"IMPOSIBIL";
    return 0;
}
........................................
SO-2
#include <iostream>
#include <cstring>
using namespace std;
char S[32][22];
int X[32],n,m,P[32],gasit;

void afisare()
{
    for(int i=1;i<=m;i++)
        cout<<S[X[i]]<<" ";
    cout<<endl;
    gasit=1;
}

int ok(int k)
{
    if(k>1 && strncmp(S[X[k]],S[X[k-1]]+strlen(S[X[k-1]])-2,2)!=0)
        return 0;
    return 1;
}

void back(int k)
{
    for(int i=1;i<=n;i++)
        if(!P[i])
        {
            X[k]=i;
            P[i]=1;
            if(ok(k))
                if(k==m) afisare();
                else back(k+1);
            P[i]=0;
        }
}

int main()
{
    cin>>n>>m;
    for(int i=1;i<=n;i++)
        cin>>S[i];
    for(int i=1;i<n;i++)
        for(int j=i+1;j<=n;j++)
            if(strcmp(S[i],S[j])>0)
                swap(S[i],S[j]);
    back(1);
    if(!gasit) cout<<"IMPOSIBIL";
    return 0;
}
*/