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

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

    v.resize(n);
    for (auto &x : v) {
        be >> x;
    }
}

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

    const uint64_t dijkoteles_db = std::count(v.begin(), v.end(), 1);
    const uint64_t max_db = std::min(dijkoteles_db, static_cast<uint64_t>(k));

    // elso = (dijkoteles_db - max_db + 1)
    // utolso = (dijkoteles_db - 2 + 1) = dijkoteles_db - 1
    // n = utolso - elso + 1 = dijkoteles_db - 1 - (dijkoteles_db - max_db + 1) = max_db - 1
    // utvonal_db = elso + .. + utolso
    // utvonal_db = (elso + utolso) * n / 2
    // utvonal_db = ((dijkoteles_db - max_db + 1) + (dijkoteles_db - 1)) * (max_db - 1) / 2
    // utvonal_db = (dijkoteles_db - max_db + 1 + dijkoteles_db - 1) * (max_db - 1) / 2
    // utvonal_db = (2 * dijkoteles_db - max_db) * (max_db - 1) / 2
    const uint64_t utvonal_db = (2 * dijkoteles_db - max_db) * (max_db - 1) / 2;
    std::cout << utvonal_db << '\n';
}

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

    feldolgoz(v, k);

    return 0;
}