elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Rompecabezas de Bitcoin, Medio millón USD en premios


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Otra duda con combinatorias de numeros :(
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] 2 Ir Abajo Respuesta Imprimir
Autor Tema: Otra duda con combinatorias de numeros :(  (Leído 5,325 veces)
luis456


Desconectado Desconectado

Mensajes: 548



Ver Perfil
Otra duda con combinatorias de numeros :(
« en: 9 Marzo 2020, 18:29 pm »

Hola chicos aca os traigo otra de mis chapuzas de combinatorias :
introduzco ejemplo estos números " 1, 2 , 3 , 5 , 7 " necesito formar con estos números  el 12 , 13 , 15 , 17 ,21 ,23 , 25, 27 etc etc menos 51 osea todo lo que tenga el 5 adelante o el 7,

lo de la limitación de los números  tengo la idea con esta rutina :

Código
  1. Return If(Value < MAX, Value, Rand.Next(0, MAX))


Adonde tengo la pega es con este :)

Código
  1. '--combis para reparar nesecita un boton y un trxbox TRABAJANDO EN ELLO AHORA
  2.    Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
  3.  
  4.        ' Dim intCol As IEnumerable(Of Integer) = {2, 3, 4, 7}
  5.        Dim intCol As IEnumerable(Of Integer) = (Result1)  '<---aca convierto las variables que trae los numeros pueden ser del 1 al 9
  6.        ' lo que nesecito es formar combinaciones pares y que no pase del numero 50
  7.  
  8.        Dim pairsCol As IEnumerable(Of String) =
  9.            From value1 As Integer In intCol
  10.            From value2 As Integer In intCol
  11.            Select String.Join(Environment.NewLine, (
  12.                               From value3 As Integer In intCol
  13.                               Where (value1 <> value2) AndAlso
  14.                                     (value1 <> value3) AndAlso
  15.                                     (value2 <> value3)
  16.                               Select String.Format("{0:00}, {1:00}, {2:00}",
  17.                                                    value1, value2, value3)))
  18.  
  19.  
  20.  
  21.        For Each pairs As String In pairsCol
  22.  
  23.  
  24.            For Each line As String In pairs.Split({Environment.NewLine}, StringSplitOptions.RemoveEmptyEntries).Distinct().ToArray
  25.                ' MsgBox(pairs.Count)
  26.                ' MsgBox(line.Count)
  27.  
  28.                Me.ListBox3.Items.Add(line)
  29.            Next line
  30.  
  31.        Next pairs
  32.    End Sub

si alguno sabria como modificarlo me ayudaria mucho

saludos
Luis


« Última modificación: 16 Marzo 2020, 06:35 am por luis456 » En línea

Que tu sabiduria no sea motivo de Humillacion para los demas
Optimus_73

Desconectado Desconectado

Mensajes: 2


Ver Perfil
Re: Otra duda con combinatorias de numeros :(
« Respuesta #1 en: 9 Marzo 2020, 21:38 pm »

Buenas, he hecho un pequeño programa en javascript. Supongo que no sera muy complicado codificarlo en .Net. Los bucles anidados son un poco marroneros pero es lo mejor que se me ha ocurrido con un tipado fuerte. Espero que te sirva ;)

Código:
let input = [1, 2, 3, 5, 7];
let output = new Array();

for(let i = 0; i < input.length; i++){
for(let j = 0; j < input.length; j++){
if(input[i] != input[j] && input[i] < 5){
output.push(input[i] * 10 + input[j]);
}
}
}

console.log(output); //[12, 13, 15, 17, 21, 23, 25, 27, 31, 32, 35, 37]


« Última modificación: 9 Marzo 2020, 21:57 pm por Optimus_73 » En línea

luis456


Desconectado Desconectado

Mensajes: 548



Ver Perfil
Re: Otra duda con combinatorias de numeros :(
« Respuesta #2 en: 10 Marzo 2020, 07:27 am »

Buenas, he hecho un pequeño programa en javascript. Supongo que no sera muy complicado codificarlo en .Net. Los bucles anidados son un poco marroneros pero es lo mejor que se me ha ocurrido con un tipado fuerte. Espero que te sirva ;)

Código:
let input = [1, 2, 3, 5, 7];
let output = new Array();

for(let i = 0; i < input.length; i++){
for(let j = 0; j < input.length; j++){
if(input[i] != input[j] && input[i] < 5){
output.push(input[i] * 10 + input[j]);
}
}
}

console.log(output); //[12, 13, 15, 17, 21, 23, 25, 27, 31, 32, 35, 37]


Gracias todo aporte vale ,lo convertiré y te cuento ;)

saludos
Luis

En línea

Que tu sabiduria no sea motivo de Humillacion para los demas
luis456


Desconectado Desconectado

Mensajes: 548



Ver Perfil
Re: Otra duda con combinatorias de numeros :(
« Respuesta #3 en: 11 Marzo 2020, 06:48 am »

Hola  bueno como os comente en un post anterior trabajo fuera de casa y este portatil no da para mucho el codigo en java echo por Optimus_73 lo he tenido que pasar primero a c

Código
  1. using System.Collections.Generic;
  2.  
  3. let input = new List() {1, 2, 3, 5, 7};
  4. let output = new Array();
  5.  
  6. for (let i = 0; i < input.length; i++)
  7. {
  8. for (let j = 0; j < input.length; j++)
  9. {
  10.  if (input[i] != input[j] && input[i] < 5)
  11.  {
  12.   output.push(input[i] * 10 + input[j]);
  13.  }
  14. }
  15. }
  16.  
  17. console.log(output); //[12, 13, 15, 17, 21, 23, 25, 27, 31, 32, 35, 37]

y despues a Visual net


pero con este portatil vamos muy mal ya que es LENTOOOO y no me deja trabajar bien

ya veremos cuando llegue el fin de semana   :silbar: :silbar: :silbar:

Código
  1. Imports System.Collections.Generic
  2. Dim input As let = new List()
  3. Dim 2, 3, 5, 7 As 1,
  4.  
  5. Dim output As let = new Array()
  6. For i As let = 0 To input.length-1
  7. For j As let = 0 To input.length-1
  8. If input(i) <> input(j) AndAlso  input(i) < 5 Then
  9.  output.push(input[i] * 10 + input[j])
  10.  
  11.  End if
  12.  
  13.  Next
  14.  
  15.  Next
  16.  
  17. console.log(output) '[12, 13, 15, 17, 21, 23, 25, 27, 31, 32, 35, 37]

saludos
Luis















En línea

Que tu sabiduria no sea motivo de Humillacion para los demas
**Aincrad**


Desconectado Desconectado

Mensajes: 668



Ver Perfil WWW
Re: Otra duda con combinatorias de numeros :(
« Respuesta #4 en: 11 Marzo 2020, 15:24 pm »

Código
  1. Imports System.Collections.Generic
  2. Dim input As let = new List()
  3. Dim 2, 3, 5, 7 As 1,
  4.  
  5. Dim output As let = new Array()
  6. For i As let = 0 To input.length-1
  7. For j As let = 0 To input.length-1
  8. If input(i) <> input(j) AndAlso  input(i) < 5 Then
  9.  output.push(input[i] * 10 + input[j])
  10.  
  11.  End if
  12.  
  13.  Next
  14.  
  15.  Next
  16.  
  17. console.log(output) '[12, 13, 15, 17, 21, 23, 25, 27, 31, 32, 35, 37]


Let? (output As let ) , bueno , correccion :

Código
  1.  Dim input As Integer() = {1, 2, 3, 5, 7}
  2.  
  3.        Dim output As New List(Of Integer)
  4.  
  5.        For i As Integer = 0 To input.Length - 1
  6.            For j As Integer = 0 To input.Length - 1
  7.                If input(i) <> input(j) AndAlso input(i) < 5 Then
  8.                    Dim result As Integer = (input(i) * 10 + input(j))
  9.                    output.Add(result)
  10.                End If
  11.            Next j
  12.        Next i


En línea



luis456


Desconectado Desconectado

Mensajes: 548



Ver Perfil
Re: Otra duda con combinatorias de numeros :(
« Respuesta #5 en: 11 Marzo 2020, 21:55 pm »

Let? (output As let ) , bueno , correccion :

Código
  1.  Dim input As Integer() = {1, 2, 3, 5, 7}
  2.  
  3.        Dim output As New List(Of Integer)
  4.  
  5.        For i As Integer = 0 To input.Length - 1
  6.            For j As Integer = 0 To input.Length - 1
  7.                If input(i) <> input(j) AndAlso input(i) < 5 Then
  8.                    Dim result As Integer = (input(i) * 10 + input(j))
  9.                    output.Add(result)
  10.                End If
  11.            Next j
  12.        Next i




bueno se agradece jejje es que de prisa y corriendo y usando un convertidor cualquiera ya os he dicho que como trabajo fuera de casa y me acompaña un Asus un poco viejillo lerdo y lento como ( yo ;(   )  ya probare tu corrección este finde 

En línea

Que tu sabiduria no sea motivo de Humillacion para los demas
EdePC
Moderador Global
***
Desconectado Desconectado

Mensajes: 2.042



Ver Perfil
Re: Otra duda con combinatorias de numeros :(
« Respuesta #6 en: 13 Marzo 2020, 18:55 pm »

pero con este portatil vamos muy mal ya que es LENTOOOO y no me deja trabajar bien

ya veremos cuando llegue el fin de semana   :silbar: :silbar: :silbar:

- Seguramente estás utilizando Visual Studio 2019, si tu PC no da para mucho o no necesitas tanta "funcionalidad" podrías usar una versión más ligera como la 2008 o 2010, dependerá mucho de las características que uses del lenguaje.

- Yo ando recopilando enlaces directos a las versiones de Visual Studio 2005, 2008 y 2010, tanto en express como profesional todo en formato ISO y de ser posible en español.

- De momento he probado las versiones Express de 2005 y van bastante aceleradas, abren en segundos y no consumen más de 100 MB de Ram XD. Los encontre solo en ingles, sin embargo hallé también la versión profesional en español XD.

- Ahora quiero probar el Visual Studio 2008 que me parece podría ser más útil y más modernito, aquí están los enlaces directos a la versión express y profesional en español:

Microsoft Visual Studio 2008 Express con SP1 en español (Gratis):
http://download.microsoft.com/download/9/6/3/9632B28F-8B0B-40E5-98AB-7102BA848165/VS2008ExpressWithSP1ESNx1504732.iso

Microsoft Visual Studio 2008 Profesional en Español (90 días de prueba, varios seriales en Internet):
http://download.microsoft.com/download/0/4/3/0434418f-7f3d-4dd6-9846-13f75353ff80/VS2008ProEdition90DayTrialESNX1435990.iso

- Seguramente algún desarrollador más activo en .NET tenga otros puntos de visto sobre usar versiones tan antiguas XD.
En línea

luis456


Desconectado Desconectado

Mensajes: 548



Ver Perfil
Re: Otra duda con combinatorias de numeros :(
« Respuesta #7 en: 13 Marzo 2020, 22:44 pm »

Grcias EdePC por el aporte  ;-)

a ver si entre semanas con esto puedo hacer algo  ;-)

saludos
Luis
En línea

Que tu sabiduria no sea motivo de Humillacion para los demas
EdePC
Moderador Global
***
Desconectado Desconectado

Mensajes: 2.042



Ver Perfil
Re: Otra duda con combinatorias de numeros :(
« Respuesta #8 en: 14 Marzo 2020, 00:47 am »

- También depende del Sistema Operativo, Windows 10 es muy pesado, si no tienes un SSD va ha ser difícil trabajar cómodamente, aparte de la cantidad de procesos, subprocesos, servicios y demás que consumen una buena cantidad de GB de Ram.

- Yo trabajo con Windows 8 (no 8.1) que es muy ligero, que porqué me gusta tanto, pues con todo lo que tengo en ejecución y apenas me consume 3 GB de Ram y no pasa de 1GHz de Ram, esto un en sistema de 64-bit, pues es todavía menos en uno de 32-bit XD, además tengo un simple HDD de 1 TB, los SSD son muy caros por la capacidad que traen:



- Dependerá de gustos, pero yo trabajo con muchas ventanas y programas a la vez y necesito una reacción rápida por parte del sistema operativo, yo quiero que la PC siga mi ritmo y no estarle esperando a que trabaje.
En línea

luis456


Desconectado Desconectado

Mensajes: 548



Ver Perfil
Re: Otra duda con combinatorias de numeros :(
« Respuesta #9 en: 14 Marzo 2020, 20:29 pm »

- También depende del Sistema Operativo, Windows 10 es muy pesado, si no tienes un SSD va ha ser difícil trabajar cómodamente, aparte de la cantidad de procesos, subprocesos, servicios y demás que consumen una buena cantidad de GB de Ram.

- Yo trabajo con Windows 8 (no 8.1) que es muy ligero, que porqué me gusta tanto, pues con todo lo que tengo en ejecución y apenas me consume 3 GB de Ram y no pasa de 1GHz de Ram, esto un en sistema de 64-bit, pues es todavía menos en uno de 32-bit XD, además tengo un simple HDD de 1 TB, los SSD son muy caros por la capacidad que traen:



- Dependerá de gustos, pero yo trabajo con muchas ventanas y programas a la vez y necesito una reacción rápida por parte del sistema operativo, yo quiero que la PC siga mi ritmo y no estarle esperando a que trabaje.


Bueno
yo estoy esperando que me llegue la nueva máquina que pedí (china jejje) es un servidor Zeon de 2.500mhz y 32 de ram, son procesadores  que ya han quitado de los dataserver, pero para un mortal como nosotros dicen que es una Bestia, pero lo demas es nuevo tarjeta madre etc ya tengo casi todo,un cajón Nforte tipo gamer  :silbar: teclado ,disco ssd de 450 gb. solo me falta la refrigeración líquida y ya tendría como poder programar sin problema ,por los momentos uso un i3 que va muy bien y uso el Visual estudio 2017.

saludos
Luis

En línea

Que tu sabiduria no sea motivo de Humillacion para los demas
Páginas: [1] 2 Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
como ago un programa en c++ que imprima numeros de una cantidad a otra?
Programación C/C++
RED_REACH 4 2,760 Último mensaje 12 Octubre 2012, 14:08 pm
por leosansan
Combinatorias
.NET (C#, VB.NET, ASP)
luis456 1 1,489 Último mensaje 8 Enero 2014, 20:15 pm
por kub0x
Duda en numeros primos
Java
noaptebuna 4 2,541 Último mensaje 22 Septiembre 2015, 09:03 am
por noaptebuna
[DUDA] Crear servidor telnet o ssh (Windows y Linux) y otra duda
Redes
MDd2 4 3,937 Último mensaje 13 Abril 2017, 18:29 pm
por Randomize
Duda con números reales
Java
pelaitass 1 2,151 Último mensaje 17 Abril 2018, 20:53 pm
por ivancea96
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines