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()
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
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
mmm no hicimos un reto de esto?
http://foro.elhacker.net/empty-t298929.0.html