#include <bits/stdc++.h>
#include <atcoder/all>
// url 
#define rep(i,a,b) for(int i=a;i<b;i++)
#define rrep(i,a,b) for(int i=b-1;i>=a;i--)
#define all(x) (x).begin(),(x).end()
#define pb(x) push_back(x);
template<class T>bool chmax(T &a, const T &b) { if (a<b) { a = b; return 1; } return 0; }
template<class T>bool chmin(T &a, const T &b) { if (b<a) { a = b; return 1; } return 0; }
typedef long long ll;
typedef long double lld;
using namespace std;
using namespace atcoder;
using mint = static_modint<998244353>;
const ll mod=998244353;
// using mint = static_modint<1000000007>;
//const ll mod=1e9+7;
int dx[4]={1,0,-1,0};
int dy[4]={0,1,0,-1};
const string zton="0123456789";
const string atoz="abcdefghijklmnopqrstuvwxyz";
const string ATOZ="ABCDEFGHIJKLMNOPQRSTUVWXYZ";
const ll inf=(1ll<<60);
// const int inf=(1<<30);
lld dist(lld x1,lld x2,lld y1,lld y2){
    lld res=(x1-x2)*(x1-x2)+(y1-y2)*(y1-y2);
    res=sqrt(abs(res));
    return res;
}
lld arg(lld x,lld y){
    const lld eps=1e-8;
    lld res=0;
    if(abs(x)+abs(y)<=eps)return 0.0;
    else if(abs(x)<=eps){
        if(y>=0.0)return (M_PI/2);
        else return (M_PI/2+M_PI);
    }
    else if(abs(y)<=eps){
        if(x>=0.0)return 0.0;
        else return M_PI;
    }
    res=atan2(abs(y),abs(x));
    if(x<=0&&y>=0)res=(M_PI-res);
    else if(x<=0&&y<=0)res+=(M_PI);
    else if(x>=0&&y<=0)res=(M_PI*2-res);
    return res;
}
ll gcd(ll a,ll b){
    if(a==0||b==0)return a+b;
    ll r;
    r=a%b;
    if(r==0){
        return b;
    }
    else{
        return gcd(b,r);
    }
}
std::ostream &operator<<(std::ostream &dest, __int128_t value) {
    std::ostream::sentry s(dest);
    if (s) {
        __uint128_t tmp = value < 0 ? -value : value;
        char buffer[128];
        char *d = std::end(buffer);
        do {
            --d;
            *d = "0123456789"[tmp % 10];
            tmp /= 10;
        } while (tmp != 0);
        if (value < 0) {
            --d;
            *d = '-';
        }
        int len = std::end(buffer) - d;
        if (dest.rdbuf()->sputn(d, len) != len) {
            dest.setstate(std::ios_base::badbit);
        }
    }
    return dest;
}
__int128 parse128(string &s) {
    __int128 ret = 0;
    for (int i = 0; i < s.length(); i++){
        if ('0' <= s[i] && s[i] <= '9'){
            ret = 10 * ret + s[i] - '0';
        }
    }
    return ret;
}
using l3 = __int128;
typedef pair<ll,int> P;
typedef tuple<ll,int,int> P2;

int main(void){
    ios::sync_with_stdio(false);
    cin.tie(nullptr);
    int N,K;cin >> N >> K;
    ll base=0;
    ll A[N];
    rep(i,0,N){
        cin >> A[i];
        if(A[i]>0){
            base+=A[i];
        }
        else{
            A[i]*=(-1);
        }
    }
    sort(A,A+N);
    int cnt=0;
    ll m=0;
    map<int,int> nx;
    priority_queue<P,vector<P>,greater<P>> q;
    q.push(P(0,0));
    nx[0]=0;
    while(q.size()&&cnt<=K){
        P p=q.top();q.pop();
        ll cost=p.first;
        int bit=p.second;
        m=max(m,cost);
        cnt++;
        if(cnt==K){
            break;
        }
        rep(dgt,nx[bit],N){
            int nbit=bit|(1<<dgt);
            P np=P(cost+A[dgt],nbit);
            nx[nbit]=dgt+1;
            if(q.size()+cnt>K){
                if(cost+A[dgt]>=m){
                    continue;
                }
            }
            q.push(np);
        }
    }
    ll ans=base-m;
    cout << ans << endl;
    // auto iter=(rbegin(s));
    // ll ans=base-(*iter).first;
    // cout << ans << endl;
    // for(auto x:s){
    //     cout << x.first << " ";
    // }
    // cout << endl;
}