import sys

def szamol(N, K, P):
    maxI = int(N/12)
    maxII = int(N/4)
    maxIII = int(N/2)

    Bendeguz=P[K-1]
    print("Bendeguz=", Bendeguz, file=sys.stderr)
    helyezes=1
    for v in range(0, K):
        if P[v]>Bendeguz:
            helyezes=helyezes+1
    i = 0
    ii = 0
    iii = 0
    if helyezes<=maxI:
        i = K
    if helyezes<=maxII:
        ii = K
    if helyezes<=maxIII:
        iii = K
    print("helyezes=", helyezes, file=sys.stderr)
    print("maxI  =", maxI, file=sys.stderr)
    print("maxII =", maxII, file=sys.stderr)
    print("maxIII=", maxIII, file=sys.stderr)
    for v in range(K, N):
        # print("P[",v,"]=",P[v], file=sys.stderr)
        if P[v]>Bendeguz:
            helyezes=helyezes+1
        if helyezes<=maxI:
            i=i+1
        if helyezes<=maxII:
            ii=ii+1
        if helyezes<=maxIII:
            iii=iii+1
    if helyezes<maxII:
        iii=0
    if helyezes<maxI:
        ii=0
    print("helyezes=", helyezes, file=sys.stderr)

    print(i)
    print(ii)
    print(iii)
    return i, ii, iii

def test():
    i, ii, iii=szamol(12, 3, [1, 2, 20, 5, 21, 22, 26, 27, 23, 28, 24, 25])
    assert 4==i
    assert 6==ii
    assert 9==iii

    i, ii, iii=szamol(12, 12, [1, 2, 20, 5, 21, 22, 26, 25, 23, 28, 24, 27])
    assert 0==i
    assert 12==ii
    assert 0==iii

def futtat():
    N=int(input())
    K=int(input())
    P=list(map(int, input().split()))
    szamol(N, K, P)

#test()
futtat()