Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 26-10-2015
Delfino Delfino is offline
Miembro
 
Registrado: jul 2003
Ubicación: Madrid
Posts: 974
Poder: 22
Delfino Va por buen camino
Duda algoritmo conjuntos

Esto va mas de algoritmos de conjuntos espero me puedan ayudar.
Teniendo un conjunto ordenador 1,2,3,4,5,6,7,8,9 como puedo saber partiendo de la obligacion de contar de tres en tres elementos por el numero de orden, que el elemento 1 es el primero, el 2 es el segundo, el 3 es el tercero, el 4 es el primero, el 5 es el segundo, el 7 es el peimero etc.
En caso de tener que partir de 4 pues lo mismo, 1 es el primero .. 4 es el cuarto, 5 es el primero, 6 es el segundo, 9 es el primero y asi.
Gracias por la ayuda..
__________________
¿Microsoft? No, gracias..
Responder Con Cita
  #2  
Antiguo 26-10-2015
Avatar de mamcx
mamcx mamcx is offline
Moderador
 
Registrado: sep 2004
Ubicación: Medellín - Colombia
Posts: 3.927
Poder: 26
mamcx Tiene un aura espectacularmamcx Tiene un aura espectacularmamcx Tiene un aura espectacular
Si el conjunto esta ordenado, es muy trivial. Solo tienes que avanzar por el valor de N y acumular los siguientes valores. Ya que esta ordenado, la respuesta esta implicita: El 1ero de cada sub-conjunto es el primero!.

O no entiendo cual es la duda...
__________________
El malabarista.
Responder Con Cita
  #3  
Antiguo 26-10-2015
Delfino Delfino is offline
Miembro
 
Registrado: jul 2003
Ubicación: Madrid
Posts: 974
Poder: 22
Delfino Va por buen camino
La duda es como se puede saber que 4 es el primero del segundo subconjunto en caso de tener que avanzar por tres y cinco lo es si hay que avanzar/saltar de cuatro en cuatro.
Necesito automatizalo por una funcion matematica y no ir contando..
Gracias por la ayuda..
__________________
¿Microsoft? No, gracias..
Responder Con Cita
  #4  
Antiguo 26-10-2015
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.257
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Pero no se entiende el problema
Responder Con Cita
  #5  
Antiguo 26-10-2015
Delfino Delfino is offline
Miembro
 
Registrado: jul 2003
Ubicación: Madrid
Posts: 974
Poder: 22
Delfino Va por buen camino
Para aclarar un poco mas no quiero recorrer el conjunto.
Si me dan como parametro el numero cinco tengo que saber que es el elemento segundo, lo mismo si me dan el numero 8, eso cuando si se salta de tres en tres. Con los otros saltos su correspondiente. Pero siempre voy a estar buscando en un conjunto de enteros ordenado.Recibiendo parametro.
Espero haberme aclarado.
__________________
¿Microsoft? No, gracias..
Responder Con Cita
  #6  
Antiguo 26-10-2015
Avatar de AgustinOrtu
[AgustinOrtu] AgustinOrtu is offline
Miembro Premium
NULL
 
Registrado: ago 2013
Ubicación: Argentina
Posts: 1.858
Poder: 16
AgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en brutoAgustinOrtu Es un diamante en bruto
Hasta donde yo se los conjuntos se caracterizan por ser colecciones de elementos sin orden y sin repetecion
Responder Con Cita
  #7  
Antiguo 26-10-2015
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.257
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Cita:
Empezado por Delfino Ver Mensaje
Para aclarar un poco mas no quiero recorrer el conjunto.
Si me dan como parametro el numero cinco tengo que saber que es el elemento segundo, lo mismo si me dan el numero 8, eso cuando si se salta de tres en tres. Con los otros saltos su correspondiente. Pero siempre voy a estar buscando en un conjunto de enteros ordenado.Recibiendo parametro.
Espero haberme aclarado.
Creo que tendrás que aclarar mejor la duda, ¿un array?, ¿una lista?, exactamente cómo es el contexto del problema.


PD: Por cierto, me gusta tu firma
Responder Con Cita
  #8  
Antiguo 26-10-2015
Avatar de mamcx
mamcx mamcx is offline
Moderador
 
Registrado: sep 2004
Ubicación: Medellín - Colombia
Posts: 3.927
Poder: 26
mamcx Tiene un aura espectacularmamcx Tiene un aura espectacularmamcx Tiene un aura espectacular
Cita:
Empezado por Delfino Ver Mensaje
Para aclarar un poco mas no quiero recorrer el conjunto.
A menos que tengas un conjunto donde solo sean numeros, y estos numeros mantengan que N = Nanterior + Mconstante no hay como hacer eso solo con una formula. Si tienes una lista como 2, 4, 6, 10, 12, aunque este ordenada no "brinca" al siguiente siguiendo una formula constante, asi que no hay como sacarla sin recorrer...
__________________
El malabarista.
Responder Con Cita
  #9  
Antiguo 26-10-2015
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por Delfino Ver Mensaje
Para aclarar un poco mas no quiero recorrer el conjunto.
Si me dan como parametro el numero cinco tengo que saber que es el elemento segundo, lo mismo si me dan el numero 8, eso cuando si se salta de tres en tres. Con los otros saltos su correspondiente. Pero siempre voy a estar buscando en un conjunto de enteros ordenado.Recibiendo parametro.
Espero haberme aclarado.
La verdad es que te has explicado fatal. Pero a ver si adivinamos.

Si el único parámetro es la longitud del salto pero siempre estás trabajando con los números consecutivos 1, 2, 3, 4 .., entonces algo como esto te puede servir:

Código Delphi [-]
function orden(N, Salto): Integer;
begin
  Result := ((N - 1) mod Salto) + 1;
end;

Pero si por conjunto ordenado te refieres a cualquier subcojunto de los números naturales pues, como dice mamcx, no hya nada qué hacer, a menos que tengas una función que te de el orden, es decir que te mapee 1, 2, 3, 4, etc. a tu conjunto..

// Saludos
Responder Con Cita
  #10  
Antiguo 27-10-2015
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola Delfino.

Coincido con lo dicho por mamcx y roman sobre la consecutividad de los elementos, de no ser así hay que recorrerlos.

También muy acertada la pregunta de Casimiro. Si se trata de tipos enumerados de elementos consecutivos y siendo divisible en subconjuntos, podrías hacer:
Código Delphi [-]
type
  TEnum = Byte;
  TSet  = set of TEnum;

function GetPosEnum(const aSet: TSet; const aEnum: TEnum; const aPaso: Byte): Integer;
begin
  if not(aEnum in aSet) then
    Result := -1
  else if Ord(aEnum) mod aPaso = 0 then
    Result := aPaso
  else
    Result := Ord(aEnum) mod aPaso;
end;

Ejemplo de uso:
Código Delphi [-]
...
var
  s : TSet;
  e : TEnum;
  n : Integer;
begin
  s := [1,2,3,4,5,6,7,8,9,10,11,12];
  e := 11;

  n := GetPosEnum(s, e, 4); // (3 subconjuntos de 4 elementos)
  if n <> -1 then
    ShowMessage(Format('Posición de %d: %d',[e, n])) // Posición de 11: 3
  else
    ShowMessage('valor no encontrado')
end;

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 27-10-2015 a las 00:16:24.
Responder Con Cita
  #11  
Antiguo 27-10-2015
Delfino Delfino is offline
Miembro
 
Registrado: jul 2003
Ubicación: Madrid
Posts: 974
Poder: 22
Delfino Va por buen camino
Gracias a todos por las repsuestas, la solucion era con el operador mod, tal y como indico roman
Gracias a todos
__________________
¿Microsoft? No, gracias..
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Mis habituales problemas al trabajar con conjuntos santiago14 Varios 3 05-08-2011 19:59:38
Manejar conjuntos (sets) en Delphi santiago14 Varios 1 25-08-2010 01:19:33
calculadora de conjuntos...insercion, union,etc sakuragi JAVA 3 19-02-2009 17:46:59
Operaciones de conjuntos. C# sakuragi .NET 2 18-06-2006 23:05:41
funcion de conjuntos,interseccion, union... sakuragi Varios 13 10-09-2005 00:01:52


La franja horaria es GMT +2. Ahora son las 01:24:45.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi