ejercicios basicos .net

Iniciado por leliCabello, 24 Marzo 2010, 18:29 PM

0 Miembros y 1 Visitante están viendo este tema.

leliCabello

qtal amigos estoy aprendiendo.net y porfavor ayudenme como hago para calcular el valor absoluto de un numero ... estoy con.net en en consola .... helpme!!! :-(

Shell Root

No haremos tu tarea, cuando tengas un problema, preguntadlo!
Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.

leliCabello

pero  al menos diganme cual es la formula o los pasos  :-(
Imports System.Console
Module Module2
    Sub main()
        Title = "Valor absoluto de un número"
        ForegroundColor = ConsoleColor.Cyan

        'entradas
        Dim factorial#, num#

        'variables
        Write("Ingresa un número: ") : num = ReadLine()


        'proceso

        'salida

    End Sub

End Module

Shell Root

Investiga sobre Valor Absoluto, El valor absoluto representan los dos posibles valores de un numero en la recta real... en el caso de 7 pues es -7 y 7
Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.

leliCabello

ah... ps avance asi, pero me sale error ayudenme xfis
Imports System.Console
Module Module2
    Sub main()
        Title = "Valor absoluto de un número"
        ForegroundColor = ConsoleColor.Cyan

        'entradas
        Dim a#, b#

        'variables
        Write("Ingresa un número: ") : a = ReadLine()

        'proceso

        a = 10
        b = a < 0 And -a = a

        'salida
        WriteLine("El valor absoluto es: {0}", b) : WriteLine()
        ReadKey()

    End Sub

End Module

seba123neo

Cita de: leliCabello en 24 Marzo 2010, 18:54 PM
pero  al menos diganme cual es la formula o los pasos  :-(


no, tenes que saber, es que no te podemos decir algo tan basico que se encuentra en un manual de visual studio...son funciones propias del mismo visual studio..en cualquier manual esta...el foro sirve para resolver otro tipo de dudas, y te digo que si sabes al menos algo formulas en Excel o de otro lenguaje de programacion, la funcion valor absoluto casi siempre lleva ese mismo nombre...mas ayuda que esta imposible.

saludos.
La característica extraordinaria de las leyes de la física es que se aplican en todos lados, sea que tú elijas o no creer en ellas. Lo bueno de las ciencias es que siempre tienen la verdad, quieras creerla o no.

Neil deGrasse Tyson

Shell Root

Es verdad, lo que dice seba123neo. Investiga de que se trata la función Abs()
Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.

leliCabello

hize todo lo q me dijeron, vi todo acerca del abs, lo implemento en mi codigo, pero me dice q tengo que declarar ABS y nose como hacer, me confunde ....


Imports System.Console
Module Module2
    Sub main()
        Title = "Valor absoluto de un número"
        ForegroundColor = ConsoleColor.Cyan

        'entradas
        Dim x#
        Dim ABS#

        'variables
        Write("Ingresa un número: ") : x = ReadLine()

        'proceso

        x = ABS(2) 'x es ahora de 2

        'salida
        WriteLine("El valor absoluto es: {0}", x) : WriteLine()
        ReadKey()



    End Sub

End Module

Shell Root

xD que tal. Creo que debes importar el Imports System.Math o usarlo así Math.Abs()

Acostumbrate a declarar el tipo de variable, es decir, así:
Código (vbnet) [Seleccionar]
Dim x As Long

Ahora no debes de declarar la funcion, la funcion ya esta creada. Así que esta linea sobra:
Código (vbnet) [Seleccionar]
Dim ABS#

Lo mire rapidin, asi que no se que más errores tienes, asi que intenta con lo que te digo, y comenta como te fue!
Por eso no duermo, por si tras mi ventana hay un cuervo. Cuelgo de hilos sueltos sabiendo que hay veneno en el aire.

leliCabello

ps si .... GRACIAS!!!! era tan sencillo, nose como me pude compllicar la vida x eso
los use ambos -->Imports System.Math o usarlo así Math.Abs()


Imports System.Console
Imports System.Math
Module Module2
    Sub main()
        Title = "Valor absoluto de un número"
        ForegroundColor = ConsoleColor.Cyan

        'entradas
        Dim x As Integer


        'variables
        Write("Ingresa un número: ") : x = ReadLine()

        'proceso

        Math.Abs(x) 'x es ahora de 2

        'salida
        WriteLine("El valor absoluto es: {0}", x) : WriteLine()
        ReadKey()



    End Sub

End Module