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

 

 


Tema destacado: Los 10 CVE más críticos (peligrosos) de 2020


  Mostrar Mensajes
Páginas: 1 ... 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 [18] 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 ... 137
171  Programación / Programación Visual Basic / Re: [RETO] Determinar Número Perfecto en: 23 Octubre 2013, 17:38 pm
HOLA!!!

Esto es VB6!!!!!!!! (con el tono de "ESTO ES ESPARTAAAAAA")

Que el No-Compilador de Net sea idiota no es mi problema.-

GRACIAS POR LEER!!!
172  Programación / Programación Visual Basic / Re: [RETO] Determinar Número Perfecto en: 23 Octubre 2013, 16:47 pm
HOLA!!!

Hice una pequeña prueba  con el maximo numero que soporta tu funcion y solo una llamada:


For the record:
Mi funcion recien empieza a tener un tiempo registrable luego de las 1000 llamadas (4ms) con 10000 llamadas llega a 47ms!
 
Y por supuesto...
Con el numero: 2305843008139952128

@Miseryk :
En vez de buscar el ultimo digito de esa manera buscalo asi, ya que tu funcion no acepta numeros mayor que long te va a servir:
Código
  1. Lastnum = Numero mod 10

GRACIAS POR LEER!!!
173  Programación / Programación Visual Basic / Re: [RETO] Determinar Número Perfecto en: 23 Octubre 2013, 16:34 pm
HOLA!!!

Me parece o alguien tomo de base mi ejemplo funcion... :silbar: :silbar: :silbar: :silbar: :silbar:

P.D: tu funcion da OVERFLOW en esta linea cuando se inserta el numero 2305843008139952128 :
Código
  1.       If numero Mod loopc = 0 Then

GRACIAS POR LEER!!!
174  Seguridad Informática / Hacking / Re: Busco dicciorario fuerza bruta en: 23 Octubre 2013, 16:28 pm
HOLA!!!



http://foro.elhacker.net/programacion_visual_basic/source_brute_force_dictionary_creator_7913-t325748.0.html

GRACIAS POR LEER!!!
175  Programación / Programación Visual Basic / Re: [RETO] Determinar Número Perfecto en: 23 Octubre 2013, 15:56 pm
HOLA!!!

Mi funcion puede verificar los numeros perfectos sin problema, probe con el ultimo que esta aca y lo verifica en menos de 0,1 ms .-

Para que vean que lo que importa es el algoritmo no el lenguaje ;)

Código
  1. Private Function IsPerfect(N As Double) As Boolean
  2.    Dim Sum As Double
  3.    Dim Aux As Double
  4.    Aux = N / 2
  5.    Sum = 1 + Aux
  6.    Do While Aux > 2
  7.        If Fix(Aux / 2) < Aux / 2 Then
  8.            Aux = Aux + 1
  9.        End If
  10.        Aux = Aux / 2
  11.        Sum = Sum + Aux
  12.    Loop
  13.    IsPerfect = (N = Sum)
  14. End Function

Superenme ;)

GRACIAS POR LEER!!!
176  Programación / Programación Visual Basic / Re: [RETO] Determinar Número Perfecto en: 23 Octubre 2013, 15:05 pm
HOLA!!!

Que comience el reto!

Ejemplo de la funcion:
Código
  1. Private Function IsPerfect(N as double) as Boolean

Si quieren hacer una funcion que devuelva el x numero perfecto aqui la funcion:
Código
  1. Private Function GetPerfect(N as  Long) as double
y que devuelva el N numero perfecto de la lista!

GRACIAS POR LEER!!!
177  Foros Generales / Sugerencias y dudas sobre el Foro / Re: Que lindo quedo el foro en: 23 Octubre 2013, 13:37 pm
HOLA!!!

El mejor estilo es.....


Tambores.....
Tambores....
Tambores...
Tambores..
Tambores.



GRACIAS POR LEER!!!
178  Programación / Programación Visual Basic / Re: [RETO] Determinar Número Perfecto en: 23 Octubre 2013, 13:18 pm
HOLA!!!

Hay que crear un verificador de numeros perfectos o un generador?

GRACIAS POR LEER!!!
179  Foros Generales / Foro Libre / Me ayudan en un concurso? en: 18 Octubre 2013, 13:17 pm
HOLA!!!

Quisiera que si tienen cuenta en DX.com por favor me voten aca:

:D

http://dx.com/dxman/DxCalendar/Comments/395

GRACIAS POR LEER!!!
180  Programación / Programación Visual Basic / Re: Como dividir una base de datos access en: 11 Octubre 2013, 13:51 pm
HOLA!!!

Podes hacer eso que te dice Mad o usar el Viejo y Querido HACHA!

GRACIAS POR LEER!!!
Páginas: 1 ... 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 [18] 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 ... 137
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines