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

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

    retek.resize(n);
    for (auto &r : retek) {
        be >> r;
    }
}

void feldolgoz(int k, const std::vector<int> &retek) {
    const int64_t n = std::count(retek.cbegin(), retek.cend(), 1) - k + 1;
    std::cout << (n > 0 ? n * (n + 1) / 2 : 0) << '\n';
}

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

    feldolgoz(k, retek);

    return 0;
}