Sorteos De Datos Sin Que Se Repitan

[marcocd]

hola buenos días a todos mi nombre es marco y estoy empezando a programar en delphi, tengo un problema y no hallo como resolverlo, les explico.

estoy haciendo un sistema de inventarios, el problema que tengo es el siguiente:

el sistema permite cargar n numero de personas que van a contar los materiales, por otro lado se encuentran los registros de los marbetes de los materiales a contar. lo que necesito es que el sistema le otorgue de manera automática a cada persona cierta cantidad de marbetes en partes iguales a cada persona sin que se repitan los marbetes entre cada persona.

al abrirse el siguiente conteo, el sistema ejecutara el mismo proceso que anteriormente describí, pero ahora los números de marbetes que le otorgaron a la persona 1 ya no deben de ser los mismos para este conteo y así sucesivamente hasta terminar todos los conteos. a continuación pongo un ejemplo de como se debe de hacer este proceso:

- se tienen 5 personas registradas en el sistema para contar.
- se tienes 25 marbetes registrados en el sistema.

al abrir el primer conteo esto se hace desde un modulo o pantalla de apertura de conteos, el sistema deberá de hacer el calculo para ver cuantos marbetes le tocan a cada persona y después el sistema deberá de asignárselos
a cada persona sin que se repitan los marbetes entre las personas, hasta aquí no hay problema, el problema es cuando se abre el siguiente conteo aquí el sistema de nuevo deberá de asignarles marbetes a cada persona, pero los marbetes que le otorgaron a la persona 1 en el primer conteo, en el siguiente conteo ya no le deben de tocar estos mismo marbetes, ya que en el primer conteo le fueron otorgados, esto se debe de aplicar a cada una de las personas que se registraron. a continuación pongo un ejemplo:

- se tienen 5 personas registradas en el sistema para contar los materiales.
- se tienen 25 marbetes registrados de los materiales a contar.

cuando se abra el primer conteo, el sistema debe de otorgar 5 marbetes a cada persona, asi:
-persona 1 le corresponden los siguientes marbetes 1,2,3,4,5
-persona 2 le corresponden los siguientes marbetes 6,7,8,9,10
-persona 3 le corresponden los siguientes marbetes 11,12,13,14,15
- y así sucesivamente hasta otorgar todos los marbetes a cada persona.

al abrirse el siguiente conteo, el sistema deberá de hacer lo mismo, pero ahora los marbetes que le otorgaron a la primera persona yo no debe de ser los mismo para este conteo. esto se debe de aplicarse a cada una de las personas registradas. quedando de la siguiente forma:
-persona 1 le corresponden los siguientes marbetes 11,12,13,14,15
-persona 2 le corresponden los siguientes marbetes 1,2,3,4,5
-persona 1 le corresponden los siguientes marbetes 6,7,8,9,10

este proceso se deberá de ejecutarse en cada una de los 4 conteos que se abrirán, hay que tener en cuenta que entre cada conteo se van a ir descartando lo marbetes de los materiales que se vayan cuadrando con la existencia real de cada material.

espero que me haya dado entender y me puedan orientar de como hacer estar rutina para logra hacer lo que quiero, que tengan excelente día, espero su pronta respuesta gracias.

[Casimiro Notevi]

Tendrás que guardar una especie de histórico de los que has asignado antes, y compararlo con los que le toque ahora. Si ya se le asignó en alguna ocasión, se pasa a otro, que no, pues se le otorga.

[bucanero]

Una alternativa a esto es aplicar una formula con este formato:

 F := ((Id_articulo + i) mod num_personas) + 1;

donde:
id_articulo: es el identificador de articulo de tipo numérico
i: es el numero de conteo que lleva cada persona (1, 2... )
num_personas: el numero que van a contar

y los artículos que corresponden a cada persona son aquellos que el resultado de esta formula coincida con el id de esta persona