fallo de mi visual basic 6.0¿?Raiz cuadrada

Iniciado por Senior++, 29 Noviembre 2011, 20:37 PM

0 Miembros y 2 Visitantes están viendo este tema.

Senior++

Bueno estaba creando un raiz cuadrada:

Código:

Function Raiz(N As Double) As Double
If N < 0 Then
        Exit Function
    Else
        Raiz = Sqr(N)
        End If
End Function

Private Sub Command1_Click()
cuadrada = Raiz(Text1.Text)
Label1.Caption = cuadrada
End Sub


Entonces cogí la calculadora de windows 7 todo esto lo hice para ver si funcionaba correctamente el código y cuando pongo para que calcule la raiz cuadrada de 2 pasa esto:



Raiz cuadrada hecha en vb6: La raiz cuadrada de 2 es: 1,4142135623731
Raiz cuadrada hecha en calculadora: La raiz cuadrada de 2 es:  1,414213562373095


Osea,no entiendo por que en cada uno da resultado distinto

Saludos
Vendo cuenta de LEAGUE OF LEGENDS lvl 30, EU west, muy barata

CAR3S?

ami con la calculadora cientifica "casio" , me da

1.414213562


:huh:

$Edu$

Solamente esta redondeando porque tanto drama? xD

79137913

HOLA!!!

Simplemente ninguna computadora ni ser humano es capaz de calcular la raiz exacta de 2, esto fue lo que volvio loco a pitagoras ya que la raiz de 2 es un numero irracional, en otras palabras es un numero con infinitas cifras decimales no periodicas, entonces NUNCA nadie ni nada podra mostrar TODAS las cifras decimales de la raiz de 2 por que son INFINITAS.

P.D: Matematica de 7mo grado SixToes, eso no es una duda de VB6 eso es que hay que volver a la escuela.

GRACIAS POR LEER!!!
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

79137913                          *Shadow Scouts Team*

tremolero

Buenas...

Sinceramente no veo ningun error, lo unico, es que en un sitio da mas decimales que ne otro.

Es mas, si eso te parece raro, mira la calculadora de windows, y haz la raiz cuadrada de 2, en estandar y luego en modo cientifico, y en uno te da mas decimales que en otro xD.

Se ve que se lo toma mas en serio la calculadora jejeje.


Saludos.

BlackZeroX

.
* Primero: aprende matematicas.
* Segundo: aprendete los rangos de cada tipo.
* Tercero: aprende a programar.

Dulces Lunas!¡.
The Dark Shadow is my passion.

x64core

Cita de: BlackZeroX (Astaroth) en 30 Noviembre 2011, 07:29 AM
.
* Primero: aprende matematicas.
* Segundo: aprendete los rangos de cada tipo.
* Tercero: aprende a programar.

Dulces Lunas!¡.
Cita de: 79137913 en 29 Noviembre 2011, 21:44 PM
HOLA!!!

Simplemente ninguna computadora ni ser humano es capaz de calcular la raiz exacta de 2, esto fue lo que volvio loco a pitagoras ya que la raiz de 2 es un numero irracional, en otras palabras es un numero con infinitas cifras decimales no periodicas, entonces NUNCA nadie ni nada podra mostrar TODAS las cifras decimales de la raiz de 2 por que son INFINITAS.

P.D: Matematica de 7mo grado SixToes, eso no es una duda de VB6 eso es que hay que volver a la escuela.

GRACIAS POR LEER!!!

vale no sean tan duros con el chico :P me imagino que aprende no :P
lo que si es que agarrad consejo SixToes

Senior++

#7
No se por que os ponéis  así, solo es una duda que tuve... en fin

de los errores se aprende, todos hemos pasado por esto alguna vez..


Black sobre que aprenda a programar: Tiempo al tiempo :D
Saludos
Vendo cuenta de LEAGUE OF LEGENDS lvl 30, EU west, muy barata

BlackZeroX

#8
Cita de: SixToes en 30 Noviembre 2011, 13:01 PM

No lo entiendo entiendo por que me as hablado de esa manera, yo siempre te e hablado con mucho respeto, nos e a que viene eso, no todos somos tan buenos como tu en vb6 y tampoco todos somos tan buenos como tu en las matematicas...

no lo entiendo, espero que este mensaje sea respondido por ti...

Saludos ;-)

El comentario no fue con un afan de ataque ni nada.

* Primero aprende matematicas en el caso computacional:
Con una simple observacion se puede ver claramente que todos los numeros son identicos los unicos que difieren son los ultimos y estos estan redondeados segun la regla de <= .5 pasa a 0 de lo contrario pasa a 1 (solo en el caso computacional).

Código (Vb) [Seleccionar]


Option Explicit

Private Sub Form_Load()
Dim a As Integer
    a = 10.5
    MsgBox a ' // 10
   
    a = 10.51
    MsgBox a ' // 11
End Sub



* Segundo aprendete los rangos de cada tipo:
Solo para saber en que momento se realiza un redondedo en un numero real (en este caso los ultimos 3 numeros o la longitud de los mismos).

* Tercero: Aprende a programar:
No declaraste varias variables, varias de ellas las dejaste que se decidan por si solas, es decir, seran variables tipo variant.

* Cuarto Robo de Nick:
Te robaste mi identidad en otro(s) foro(s).

Dulces Lunas!¡.
The Dark Shadow is my passion.

79137913

HOLA!!!

Cita de: BlackZeroX (Astaroth) en 30 Noviembre 2011, 20:18 PM
* Cuarto Robo de Nick:
Te robaste mi identidad en otro(s) foro(s).

:o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o :o

No me caia bien y ahora mucho menos.

GRACIAS POR LEER!!!
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

79137913                          *Shadow Scouts Team*