//include
//------------------------------------------
#include <vector>
#include <list>
#include <map>
#include <unordered_map>
#include <climits>
#include <set>
#include <unordered_set>
#include <deque>
#include <stack>
#include <bitset>
#include <algorithm>
#include <functional>
#include <numeric>
#include <utility>
#include <sstream>
#include <iostream>
#include <iomanip>
#include <cstdio>
#include <cmath>
#include <cstdlib>
#include <cctype>
#include <string>
#include <cstring>
#include <ctime>
#include <queue>
#include <random>
#include <chrono>
#include <complex>
#include <regex>
#include <locale>
#include <random>
#include <cassert>
#include <type_traits>

using namespace std;

// typedef
//------------------------------------------
typedef long long LL;
typedef vector<int> VI;
typedef vector<bool> VB;
typedef vector<char> VC;
typedef vector<double> VD;
typedef vector<string> VS;
typedef vector<LL> VLL;
typedef vector<VI> VVI;
typedef vector<VB> VVB;
typedef vector<VS> VVS;
typedef vector<VLL> VVLL;
typedef vector<VVI> VVVI;
typedef vector<VVLL> VVVLL;
typedef pair<int, int> PII;
typedef pair<LL, LL> PLL;
typedef pair<int, string> PIS;
typedef pair<string, int> PSI;
typedef pair<string, string> PSS;
typedef vector<PII> VPII;
typedef vector<PLL> VPLL;
typedef vector<VPII> VVPII;
typedef vector<VPLL> VVPLL;
typedef vector<VS> VVS;
typedef map<int, int> MII;
typedef map<LL, LL> MLL;
typedef map<string, int> MSI;
typedef map<int, string> MIS;

// container util
//------------------------------------------

typedef int pInt[4];
#define ALL(a)  (a).begin(),(a).end()
#define SZ(a) int((a).size())
#define EACH(i, arr) for(typeof((arr).begin()) i=(arr).begin(); i!=(arr).end(); ++i)
#define EXIST(str, e) ((str).find(e)!=(str).end())
#define COUNT(arr, v) count((arr).begin(), (arr).end(), v)
#define SEARCH(v, w) search((v).begin(), (v).end(), (w).begin(), (w).end())
#define SORT(c) sort((c).begin(),(c).end())
#define RSORT(c) sort((c).rbegin(),(c).rend())
#define REVERSE(c) reverse((c).begin(), (c).end())
#define ROTATE_LEFT(arr, c) rotate((arr).begin(), (arr).begin()+(c), (arr).end())
#define ROTATE_RIGHT(arr, c) rotate((arr).rbegin(), (arr).rbegin() + (c), (arr).rend())
#define SUMI(arr) accumulate((arr).begin(), (arr).end(), 0)
#define SUMD(arr) accumulate((arr).begin(), (arr).end(), 0.)
#define SUMLL(arr) accumulate((arr).begin(), (arr).end(), 0LL)
#define MULD(arr) accumulate((arr).begin(), (arr).end(), 1., multiplies<double>())
#define UB(arr, n) upper_bound((arr).begin(), (arr).end(), n)
#define LB(arr, n) lower_bound((arr).begin(), (arr).end(), n)
#define PB push_back
#define MP make_pair
#define ft first
#define sd second


// input output
//------------------------------------------
#define GL(s) getline(cin, (s))
#define INIT() std::ios::sync_with_stdio(false);std::cin.tie(0)
#define OUT(d) std::cout<<(d)
#define OUT_L(d) std::cout<<(d)<<endl
#define FOUT(n, data) std::cout<<std::fixed<<std::setprecision(n)<<(data)
#define FOUT_L(n, data) std::cout<<std::fixed<<std::setprecision(n)<<(data)<<"\n"
#define EL() printf("\n")
#define SHOW_VECTOR(v) {std::cerr << #v << "\t:";for(const auto& xxx : v){std::cerr << xxx << " ";}std::cerr << "\n";}
#define SHOW_MAP(v) {std::cerr << #v << endl; for(const auto& xxx: v){std::cerr << xxx.first << " " << xxx.second << "\n";}}
#define Yes() printf("Yes\n")
#define No() printf("No\n")
#define YES() printf("YES\n")
#define NO() printf("NO\n")
#define Yay() printf("Yay!\n")
#define Nnn() printf(":(\n")
#define CE(x, y) ((x + y - 1) / (y))


template<typename T1, typename T2>
istream &operator>>(istream &in, pair<T1, T2> &p) {
    in >> p.first >> p.second;
    return in;
}

template<typename T>
istream &operator>>(istream &in, vector<T> &v) {
    for (auto &x: v)
        in >> x;
    return in;
}


template<typename T1, typename T2>
ostream &operator<<(ostream &out, const std::pair<T1, T2> &p) {
    out << "[" << p.first << ", " << p.second << "]" << "\n";
    return out;
}

template<class T1, class T2>
inline bool chmin(T1 &a, T2 b) {
    if (a > b) {
        a = b;
        return true;
    }
    return false;
}

template<class T1, class T2>
inline bool chmax(T1 &a, T2 b) {
    if (a < b) {
        a = b;
        return true;
    }
    return false;
}


//repetition
//------------------------------------------
#define FOR(i, a, b) for(int i=(a);i<(b);++i)
#define RFOR(i, a, b) for(int i=(b)-1;i>=(a);--i)
#define REP(i, n)  FOR(i,0,n)
#define RREP(i, n) for(int i = n-1;i >= 0;i--)
#define FORLL(i, a, b) for(LL i=LL(a);i<LL(b);++i)
#define RFORLL(i, a, b) for(LL i=LL(b)-1;i>=LL(a);--i)
#define REPLL(i, n) for(LL i=0;i<LL(n);++i)
#define RREPLL(i, n) for(LL i=LL(n)-1;i>=0;--i)
#define FOREACH(x, arr) for(auto &(x) : (arr))

// Option + Control + K  Terminal
// Command + Control + K    Run
// Command + b   EOF



//------------------------------------------
//------------------------------------------


template<int_fast64_t Modulas = 1000000007ul>
class ModInt {
    using u64 = int_fast64_t;
public:
    u64 x;

    constexpr ModInt() : x(0) {}
    constexpr ModInt(int_fast64_t v) : x((v % Modulas + Modulas) % Modulas) {}
    constexpr ModInt operator+(const ModInt rhs) const noexcept {
        return ModInt(*this) += rhs;
    }
    constexpr ModInt operator-(const ModInt rhs) const noexcept {
        return ModInt(*this) -= rhs;
    }
    constexpr ModInt operator*(const ModInt rhs) const noexcept {
        return ModInt(*this) *= rhs;
    }
    constexpr ModInt operator/(const ModInt rhs) const noexcept {
        return ModInt(*this) /= rhs;
    }
    constexpr ModInt operator/(const long long rhs) const noexcept {
        return ModInt(*this) /= rhs;
    }
    constexpr ModInt operator+=(const ModInt rhs) noexcept {
        x += rhs.x;
        if (x >= Modulas) x -= Modulas;
        return *this;
    }
    constexpr ModInt operator+=(const long long rhs) noexcept {
        auto hs = ModInt<Modulas>(rhs);
        (*this) += hs;
        return *this;
    }
    constexpr ModInt operator-=(const ModInt rhs) noexcept {
        if (x < rhs.x) x += Modulas;
        x -= rhs.x;
        return *this;
    }
    constexpr ModInt operator-=(const long long rhs) noexcept {
        auto hs = ModInt<Modulas>(rhs);
        (*this) -= hs;
        return *this;
    }
    constexpr ModInt operator*=(const ModInt rhs) noexcept {
        x = x * rhs.x % Modulas;
        return *this;
    }
    constexpr ModInt operator*=(const long long rhs) noexcept {
        auto hs = ModInt<Modulas>(rhs);
        (*this) *= hs;
        return *this;
    }
    constexpr ModInt &operator/=(ModInt rhs) noexcept {
        u64 exp = Modulas - 2;
        while (exp > 0) {
            if (exp & 1ul) *this *= rhs;
            rhs *= rhs;
            exp >>= 1ul;
        }
        return *this;
    }
    constexpr ModInt &operator/=(long long rhs) noexcept {
        auto hs = ModInt<Modulas>(rhs);
        (*this) /= hs;
        return *this;
    }

    constexpr ModInt &operator++() noexcept {
        x++;
        if (x >= Modulas) x -= Modulas;
        return *this;
    }
    constexpr ModInt &operator--() noexcept {
        if (x == 0) x += Modulas;
        x--;
        return *this;
    }
    constexpr bool operator<(const ModInt rhs) const noexcept {
        return x < rhs.x;
    }
    constexpr bool operator==(const ModInt rhs) const noexcept {
        return this->x == rhs.x;
    }
    constexpr bool operator!=(const ModInt rhs) const noexcept {
        return !(*this == rhs);
    }
    friend istream &operator>>(istream &in, ModInt &m) {
        in >> m.x;
        if (m.x < 0) m.x += Modulas;
        m.x %= Modulas;
        return in;
    }
    friend ostream &operator<<(ostream &out, const ModInt &p) {
        out << p.x;
        return out;
    }
    constexpr ModInt pow(u64 p) const {
        ModInt ret(1);
        ModInt mul(x);
        while (p > 0) {
            if (p & 1ul) ret *= mul;
            mul *= mul;
            p >>= 1ul;
        }
        return ret;
    }
    constexpr ModInt operator~() const noexcept {
        u64 exp = Modulas - 2;
        return pow(exp);
    }

    constexpr static ModInt arith_sum(ModInt<Modulas> a, ModInt<Modulas> d, ModInt<Modulas> n) noexcept {
        return (a * ModInt<Modulas>(2) + (n - 1) * d) * n / ModInt<Modulas>(2);
    }
};

template<typename T>
class CulSum {
private:
    long long N;
    vector<T> a;
    vector<T> aa;
    vector<T> b;
    vector<T> bb;

    function<T(T, T)> func;

public:

    /// @param a original array
    CulSum(vector<T> _a) {
        N = _a.size();
        a = _a;
        b = _a;
        reverse(b.begin(), b.end());
        this->aa = vector<T>(N + 1, T{});
        this->bb = vector<T>(N + 1, T{});
        for (int i = 0; i < N; i++) aa[i + 1] = a[i] + aa[i];
        for (int i = 0; i < N; i++) bb[i + 1] = b[i] + bb[i];
    }

    /// @param a original array
    CulSum(vector<T> _a, function<T(T, T)> func) : func(func) {
        N = _a.size();
        a = _a;
        b = _a;
        reverse(b.begin(), b.end());
        this->aa = vector<T>(N + 1, T{});
        this->bb = vector<T>(N + 1, T{});
        for (int i = 0; i < N; i++) aa[i + 1] = func(a[i], aa[i]);
        for (int i = 0; i < N; i++) bb[i + 1] = func(b[i], bb[i]);
    }

    /// @brief 0-index original
    /// @param l original close
    /// @param r original open
    T get_sum(int l, int r) {
        return aa[r] - aa[l];
    }

    /// @brief 0-index original
    /// @param l original close
    /// @param r original open
    T get_sum_reverse(int l, int r) {
        l = N - l;
        r = N - r;
        return bb[l] - bb[r];
    }

    /// @brief 0-index original
    /// @param k length
    T get_sum_lead_k_len(int k) {
        return get_sum(0, k);
    }

    /// @brief 0-index original
    /// @param k length
    T get_sum_tail_k_len(int k) {
        return get_sum_reverse(N - k, N);
    }

    void show() {
        for (int i = 0; i < N + 1; i++) cout << aa[i] << " ";
        cout << endl;
    }

    void show_reverse() {
        for (int i = N; i >= 0; i--) cout << bb[i] << " ";
        cout << endl;
    }

};

int main() {

    LL N, K;
    cin >> N >> K;

    VLL A(N);
    cin >> A;

    LL has_zero = count(A.begin(), A.end(), 0) > 0;

    VLL S, T;
    vector<long double> X, Y;
    for (int i = 0; i < N; i++) {
        if (A[i] >= 0) {
            X.push_back(log(A[i]));
            S.push_back(A[i]);
        }
        if (A[i] < 0) {
            Y.push_back(log(-A[i]));
            T.push_back(-A[i]);
        }
    }

    RSORT(S);
    RSORT(T);
    RSORT(X);
    RSORT(Y);

    CulSum<long double> x_sum(X);
    CulSum<long double> y_sum(Y);

    auto ans = -std::numeric_limits<long double>::infinity();

    LL ans_k = -1;
    LL if_minus = 0;

    for (int i = 0; i <= min<LL>(K, X.size()); i++) {
        auto xs = x_sum.get_sum_lead_k_len(i);
        if (K - i < 0) continue;
        if (K - i > Y.size()) continue;
        auto ys = y_sum.get_sum_lead_k_len(K - i);
        auto s = xs + ys;
        LL mi = 0;
        if ((K - i) % 2 and abs(s) != std::numeric_limits<long double>::infinity()) {
            s = -s;
            mi = 1;
        }
        if (s > ans) {
            ans_k = i;
            ans = s;
            if (mi) if_minus = 1;
            else if_minus = 0;
        }
    }

    LL prev = 0;
    for (int i = 0; i <= min<LL>(K, X.size()); i++) {
        auto xs = x_sum.get_sum_lead_k_len(i);
        if (K - i < 0) continue;
        if (K - i > Y.size()) continue;
        auto ys = y_sum.get_sum_tail_k_len(K - i);
        auto s = xs + ys;

        LL mi = 0;
        if ((K - i) % 2 and abs(s) != std::numeric_limits<long double>::infinity()) {
            s = -s;
            mi = 1;
        }
        if (s > ans) {
            ans_k = i;
            ans = s;
            prev = 1;
            if (mi) if_minus = 1;
            else if_minus = 0;
        }
    }

    if (abs(ans) == std::numeric_limits<long double>::infinity()) {
        cout << 0 << endl;
        return 0;
    }
//    cout << ans_k << endl;

    ModInt<> true_ans = 1;
    for (int i = 0; i < ans_k; i++) true_ans *= S[i];
    if (prev) {
        for (int i = 0; i < K - ans_k; i++) true_ans *= T[T.size() - i - 1];
    } else {
        for (int i = 0; i < K - ans_k; i++) true_ans *= T[i];
    }
    if (if_minus) {
        true_ans = ModInt<>(0) - true_ans;
        if(has_zero){
            true_ans = 0;
        }
    }

    cout << true_ans << endl;


}



























































Measured memory_bytes: 27376