PASCAL - Como contar números iguales

No se como hace eso, que el usuario este ingresando una cadena de números y el programa o la condición me cuente todos los números iguales que se vayan introduciendo... OSEA la función en si para comparar los números si son iguales o no... Por favor ayuda TT_TT no se como se hace eso en pascal lo he intentando mles de veces y nada que ver!