Título: (AYUDA) conjetura de goldbach Publicado por: jpablom95 en 1 Mayo 2013, 16:54 pm hola,les agradecería si me ayudan, tengo este código que calcula todos los números primos hasta un determinado numero par dado por el usuario, ahora los tengo que guardar en un arreglo (los números primos) para después sumarlos consecutivamente hasta que de el numero par ingresado por el usuario, pero no se como guardarlos en vector, espero que me ayuden, gracias.
el algoritmo calcula los dos números primos que sumados dan el numero par ingresado. Sub Main() Dim num As Integer Dim comprobacion As Boolean = True comprobacion = True Console.Write("Digite numero ") num = Console.ReadLine() For num = 1 To num comprobacion = True For I = 2 To num - 1 If (num Mod I = 0) Then comprobacion = False End If Next If (comprobacion = True) Then Console.WriteLine(num) End If Next Console.ReadLine() Título: Re: (AYUDA) conjetura de goldbach Publicado por: Danyfirex en 2 Mayo 2013, 19:53 pm Me parece algo tonto. si yo ingreso el numero par 2 como consigues la suma :silbar:
con un numero mas alto de 2 si se da. tendrías que crear un simple arreglo para verificar que mi numero primo arreglo(0)+arreglo(1) sean mi numero no necesariamente crear un arreglo completo sino ir rellenando y comprobando. saludos Título: Re: (AYUDA) conjetura de goldbach Publicado por: tincopasan en 3 Mayo 2013, 07:54 am no entiendo!
decis que muestre los números primos hasta un número par dado, por ejemplo: si pongo 6 me mostraría 1 3 5 y después decis que los sume consecutivamente 1 + 3+ 5 = 9 para que de 6 no es consecutivamente. agregarlos a un vector es fácil: declaras un vector dim vector() as integer dim num as integer num = val(text1) y con redim vector (1 to num) as integer le asignas el tamaño esto es básicamente en vb6 en .net ni idea Título: Re: (AYUDA) conjetura de goldbach Publicado por: Elemental Code en 3 Mayo 2013, 22:51 pm mmm no hicimos un reto de esto?
http://foro.elhacker.net/empty-t298929.0.html |