#include <iostream>
#include <vector>
#include <algorithm>
#include <cstdint>

void beolvas(std::istream &be, std::vector<int> &a, int &k) {
    int n;
    be >> n >> k;

    a.resize(n);
    for (auto &e : a) {
        be >> e;
    }
}

void feldolgoz(std::vector<int> &a, int k) {
    const auto n = static_cast<int>(a.size());

    sort(a.begin(), a.end());

    std::vector<int64_t> bal_osszeg(n);
    bal_osszeg[0] = a[0];
    for (int i = 1; i < n; i++) {
        bal_osszeg[i] += bal_osszeg[i - 1] + a[i];
    }

    int64_t pontok[2] = { 0, 0 };
    int j = 0;
    for (int i = n - 1; i >= 0; i--) {
        if (i < k && a[i] < bal_osszeg[i]) {
            pontok[j] += bal_osszeg[i];
            break;
        }

        pontok[j] += a[i];
        j = 1 - j;
    }

    std::cout << pontok[0] << ' ' << pontok[1] << '\n';
}

int main() {
    std::vector<int> a;
    int k;
    beolvas(std::cin, a, k);

    feldolgoz(a, k);

    return 0;
}