*Hướng dẫn:

Bạn nhập m,n và list a (theo đề)

Bạn cho một list s ghi tất cả số từ 1 đến n (trong pascal có hàm nào có thể xóa các số giống nhau thì bạn dùng)

Bạn cho tạo list dem dùng để đếm số lượng phiếu (dùng hàm đếm số lượng nếu có)

Hãy tìm ra giá trị lớn nhất bằng cách chạy trong list dem (dùng hàm max() nếu có)

Cuối cùng, bạn sẽ chạy trong list dem và in ra s[i]

*Cách làm nhanh hơn (làm như bài đoạn con) (mình sẽ code python bằng cách này)

Nhập m,n và list a theo đề

Xắp xếp lại list a (dùng hàm nếu có)

Sau đó, tạo list s có n phần tử

Cuối cùng là xét xem đoạn con nào có nhiều phần tử nhất, lưu lại vị trí để in ra

*Code (theo cách 2):

fi=open("BAI2.inp","r")
fo=open("BAI2.out","w")
m,n=map(int,fi.readline().split())
a=list(map(int,fi.read().split()))
a.sort()
s=[1]*n
for i in range (1,n):
    if (a[i]==a[i-1]):
        s[i]=s[i-1]+1
mx=max(s)
vt=[]
for i in range (n):
    if (s[i]==mx):
        vt.append(i)
for i in vt:
    fo.write(str(a[i])+" ")
fi.close()
fo.close()