#include <iostream>

using namespace std;

int sorozat[100000];

int main()
{
    int n,k,b/*, sorozat[10]*/, x=1, nullashelye=-1;
    long long szorzat=1;
    bool csere=1, csakmost=0;
    cin>>n>>k>>b;
    for(int i=0;i<n;i++)
    {
        cin>>sorozat[i];
    }
    while(csere)
    {
        csere=0;
        for(int i=0;i<n-x;i++)
        {
            if(sorozat[i]<sorozat[i+1])
            {
                swap(sorozat[i],sorozat[i+1]);
                csere=1;
            }
        }
        x++;
    }
    csere=0; x=0;
    while(!csere && x<n)
    {
        if(sorozat[x]==0)
        {
            nullashelye=x;
            csere=1;
        }
        x++;
    }
    x=b;
    for(int j=0;j<k;j++)
    {
        if(sorozat[x]<0)
        {
            sorozat[x]++;
        }
        else if(sorozat[x]==0 && x<n-1 && sorozat[x+1]<0)
             {
                 x++;
                 sorozat[x]++;
             }
             else if(sorozat [x]==0 && x<n-1)
                  {
                      sorozat[x]++;
                      if(x+1<n-1 && sorozat[x+1]==0)
                      {
                          x++;
                      }
                      else
                      {
                          x=b;
                          csakmost=1;
                      }
                  }
                  else
                  {
                      if(csakmost)
                      {
                          x=0;
                          csakmost=0;
                      }
                      sorozat[x]++;
                      if(sorozat[x]!=1 && x<n-1) x++;
                      else if(x==n-1)x=0;

                  }


    }
    for(int i=0;i<n;i++)
    {
        szorzat*=sorozat[i];
    }
    if(szorzat >= 0)
        cout<<szorzat;
    else cout<<-1;



    return 0;
}