juega

¿Cómo escribo un programa Pascal que juega un juego de adivinanzas numéricas?