#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());

    int opt = 0, ossz = 0;
    for (int i = 0; i < k; i++) {
        ossz += a[i];
        opt = std::max(ossz, ossz - opt);
    }

    for (int i = k; i < n; i++) {
        ossz += a[i];
        opt = ossz - opt;
    }

    std::cout << opt << ' ' << ossz - opt << '\n';
}

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

    feldolgoz(a, k);

    return 0;
}