#include<string.h>
#include<iostream>
#include <stdio.h>
#include <cstdlib>
using namespace std;
int compare (const void * a, const void * b)
{
return ( *(int*)b - *(int*)a );
}
int main()
{
long int a;
while(cin>>a)
{
if (cin.peek()=='\n') cout<<"-"<<endl;
long int *tab;
tab = new long int[100000];
long int i=0;
for(i=0; i<100000; i++)
{
cin>>tab[i];
if (cin.peek()=='\n') break;
}
//i=rozmiar tablicy -1
//teraz tworzę tablicę tab2 o odpowiednim rozmiarze
long int *tab2;
tab2 = new long int[i+1];
for(long int i2=0; i2<=i; i2++)
{
tab2[i2]=tab[i2];
}
qsort(tab2, i+1, sizeof(long int), compare);
//x=licznik powtarzających się elementów w ciągu do usunięcia
//teraz usuwam powtarzające się elementy w tab2
int x=0;
for(long int i2=0; i2<i-x; i2++)
{
if (tab2[i2+1]==tab2[i2])
{
for(long int i3=i2; i3<=i-1-x; i3++)
{
tab2[i3]=tab2[i3+1];
}
x++;
i2--;
}
}
//przepisuje do tab 3 elementy z tab 2, rozmiar tablicy pomniejszony o liczbe powtarzajacych sie elementow
long int *tab3;
tab3=new long int[i-x+1];
for(long int b=0; b<=i-x; b++)
{
tab3[b]=tab2[b];
}
//jesli a jest wieksze od rozmiaru tab3 to wynik jest "=", w przeciwnym razie wynik to "a"element tablicy
if(a-1>i-x)cout<<"-"<<endl;
else cout <<tab3[a-1]<<endl;
delete []tab;
delete []tab2;
delete []tab3;
}
return 0;
}
I2luY2x1ZGU8c3RyaW5nLmg+CiNpbmNsdWRlPGlvc3RyZWFtPgojaW5jbHVkZSA8c3RkaW8uaD4KI2luY2x1ZGUgPGNzdGRsaWI+Cgp1c2luZyBuYW1lc3BhY2Ugc3RkOwoKaW50IGNvbXBhcmUgKGNvbnN0IHZvaWQgKiBhLCBjb25zdCB2b2lkICogYikKewogIHJldHVybiAoICooaW50KiliIC0gKihpbnQqKWEgKTsKfQppbnQgbWFpbigpCnsKICAgIGxvbmcgaW50IGE7CgogICAgd2hpbGUoY2luPj5hKQogICAgewogICAgICAgIGlmIChjaW4ucGVlaygpPT0nXG4nKSBjb3V0PDwiLSI8PGVuZGw7CgogICAgICAgIGxvbmcgaW50ICp0YWI7CiAgICAgICAgdGFiID0gbmV3IGxvbmcgaW50WzEwMDAwMF07CiAgICAgICAgbG9uZyBpbnQgaT0wOwogICAgICAgIGZvcihpPTA7IGk8MTAwMDAwOyBpKyspCiAgICAgICAgewogICAgICAgICAgICBjaW4+PnRhYltpXTsKICAgICAgICAgICAgaWYgKGNpbi5wZWVrKCk9PSdcbicpIGJyZWFrOwogICAgICAgIH0KCiAgICAgICAgLy9pPXJvem1pYXIgdGFibGljeSAtMQogICAgICAgIC8vdGVyYXogdHdvcnrEmSB0YWJsaWPEmSB0YWIyIG8gb2Rwb3dpZWRuaW0gcm96bWlhcnplCiAgICAgICAgbG9uZyBpbnQgKnRhYjI7CiAgICAgICAgdGFiMiA9IG5ldyBsb25nIGludFtpKzFdOwogICAgICAgIGZvcihsb25nIGludCBpMj0wOyBpMjw9aTsgaTIrKykKICAgICAgICB7CiAgICAgICAgICAgIHRhYjJbaTJdPXRhYltpMl07CiAgICAgICAgfQoKICAgICAgICBxc29ydCh0YWIyLCBpKzEsIHNpemVvZihsb25nIGludCksIGNvbXBhcmUpOwoKICAgICAgICAvL3g9bGljem5payBwb3d0YXJ6YWrEhWN5Y2ggc2nEmSBlbGVtZW50w7N3IHcgY2nEhWd1IGRvIHVzdW5pxJljaWEKICAgICAgICAvL3RlcmF6IHVzdXdhbSBwb3d0YXJ6YWrEhWNlIHNpxJkgZWxlbWVudHkgdyB0YWIyCiAgICAgICAgaW50IHg9MDsKICAgICAgICBmb3IobG9uZyBpbnQgaTI9MDsgaTI8aS14OyBpMisrKQogICAgICAgIHsKICAgICAgICAgICAgaWYgKHRhYjJbaTIrMV09PXRhYjJbaTJdKQogICAgICAgICAgICB7CgogICAgICAgICAgICAgICAgZm9yKGxvbmcgaW50IGkzPWkyOyBpMzw9aS0xLXg7IGkzKyspCiAgICAgICAgICAgICAgICB7CgogICAgICAgICAgICAgICAgICAgIHRhYjJbaTNdPXRhYjJbaTMrMV07CiAgICAgICAgICAgICAgICB9CgogICAgICAgICAgICAgICAgeCsrOwogICAgICAgICAgICAgICAgaTItLTsKICAgICAgICAgICAgfQogICAgICAgIH0KICAgICAgICAvL3ByemVwaXN1amUgZG8gdGFiIDMgZWxlbWVudHkgeiB0YWIgMiwgcm96bWlhciB0YWJsaWN5IHBvbW5pZWpzem9ueSBvIGxpY3piZSBwb3d0YXJ6YWphY3ljaCBzaWUgZWxlbWVudG93CiAgICAgICAgbG9uZyBpbnQgKnRhYjM7CiAgICAgICAgdGFiMz1uZXcgbG9uZyBpbnRbaS14KzFdOwogICAgICAgIGZvcihsb25nIGludCBiPTA7IGI8PWkteDsgYisrKQogICAgICAgIHsKICAgICAgICAgICAgdGFiM1tiXT10YWIyW2JdOwogICAgICAgIH0KCiAgICAgICAgLy9qZXNsaSBhIGplc3Qgd2lla3N6ZSBvZCByb3ptaWFydSB0YWIzIHRvIHd5bmlrIGplc3QgIj0iLCB3IHByemVjaXdueW0gcmF6aWUgd3luaWsgdG8gImEiZWxlbWVudCB0YWJsaWN5CgoKICAgICAgICBpZihhLTE+aS14KWNvdXQ8PCItIjw8ZW5kbDsKICAgICAgICBlbHNlIGNvdXQgPDx0YWIzW2EtMV08PGVuZGw7CgogICAgICAgIGRlbGV0ZSBbXXRhYjsKICAgICAgICBkZWxldGUgW110YWIyOwogICAgICAgIGRlbGV0ZSBbXXRhYjM7CiAgICB9CgogICAgcmV0dXJuIDA7Cn0KCgoK