Megszámolás(N,J,L,DB): DB:=0 Ciklus I=1-től N-ig Ha J[I]<=MIN[L[I]] akkor DB:=DB+1 Ciklus vége Eljárás vége