Eljárás:
    S := 0
    Ciklus I = 1-től N-ig
        Ha A(I) T tulajdonságú akkor S := S + 1
    Ciklus vége
Eljárás vége.