#include <iostream>
#include <cstdio>
using namespace std;
#define MAXSIZE 100
typedef int Status;
typedef int Elem;
typedef struct
{
Elem *data;
int len;
} SqList;
Status InitList(SqList &L)
{
L.data = new Elem[MAXSIZE];
L.len = 0;
if (L.data)
return -1;
return 1;
}
Status GetList(SqList &L, int i, Elem &e)
{
if (i < 1 || i > L.len)
return -1;
e = L.data[i - 1];
return e;
}
Status Locatedata(SqList L, Elem e)
{
for (int i = 0; i < L.len; i++)
if (L.data[i] == e)
return i + 1;
return 1;
}
Status InsertList(SqList &L, int i, Elem e)
{
if (i < 1 || i > L.len + 1)
return -1;
if (L.len == MAXSIZE)
return -1;
for (int j = L.len; j >= i - 1; j--)
L.data[j + 1] = L.data[j];
L.data[i - 1] = e;
++L.len;
return 1;
}
Status DelList(SqList &L, int i)
{
if (i < 1 || i > L.len)
return -1;
for (int j = i; j < L.len - 1; j++)
L.data[j - 1] = L.data[j];
--L.len;
return 1;
}
Status DelAlList(SqList &L)
{
L.data = NULL;
L.len = 0;
return 1;
}
int main()
{
SqList List;
InitList(List);
int num;
cin >> num;
for (int i = 1; i <= num; i++)
{
Elem OBJ;
cin >> OBJ;
InsertList(List, i, OBJ);
}
for (int i = 0; i < List.len; i++)
cout << List.data[i];
DelAlList(List);
for (int i = 0; i < List.len; i++)
cout << List.data[i];
}