Autor Tema: Ayuda Por Favor Soy Un Negao (Leído 1703 veces)

Landxet · « **en:** Lunes 30 de Abril de 2007, 19:14 »

Hola a todos
Se que para vosotros esto sera una memez,espero q no os riais de mi

, pero tngo un problemilla con un ejercicio de una matriz , estoy atrancado y no me sale
Yo no tngo ni idea de programacion

y como dnd estoy no explican muxo pues na, a ver si alguien podria escribirlo aqui y asi me entero de como quieren que lo haga.
El ejercicio: (os escribo lo que me piden por pasos)
-Cree una nueva aplicacion de consola
-Establezca Option Strict en On
-Declare dos matrices para que:
- En la primera se almacenen los primeros numeros naturales (empezando por el cero)
-En la segunda se almacene el valor del factorial del numero incluido en la misma posicion de la primera matriz
*(Es decir si tenemos que en la posicion 3 de la primera matriz se guarda el valor 3, entonces en la posicion 3 de la segunda matriz estara el valor correspondiente al factorial de 3, que es 6)*
-Debera escribir el codigo necesario para realizar este calculo y almacenarlo en la segunda matriz
-A continuacion imprima el contenido de la segunda matriz.Una linea por cada uno de los valores
-Guarde,compile y pruebe la aplicacion.
Por favor que alguien la escriba es q soy un negao
MUCHAS GRACIAS A TODOS

Cajami · « **Respuesta #1 en:** Lunes 30 de Abril de 2007, 19:39 »

Hola, se casi naa de aplicaciones de consola, pero especificamente que es lo que no te sale???? me supongo que habras avanzado con algo

Landxet · « **Respuesta #2 en:** Lunes 30 de Abril de 2007, 19:50 »

Yo presente la matriz de una forma pero me comentaron que no era asi

Dim a() as short = {0,1,2,3,4,5,6,7,8,9,10}
Dim factorial as integer = y q pongo aqui?
¿Utilizo bucles??
¿que tipo de bucles?
¿q tipo de instruccion?
¿que clase de condicion?
es q no tngo nada claro

, porq yo la hice declarandola en vertical y rellenandola pero me comentaron q habia q hacerlo entre llaves por lo de los bytes y tal, el caso es q no es solo por eso... en fin podriais escribirla vosotros no es para que me hagais el trabajo es porq quiero saber a que se refieren.
Para vosotros es facil y supongo q no es nada largo..., es q no tngo ni P. idea asi me servira para hacerme una idea para las proximas
POR FAVOR escribidla
GRACIAS

Cajami · « **Respuesta #3 en:** Lunes 30 de Abril de 2007, 23:00 »

Hola, bueno mira aqui te dejo de acuerdo a como lo has puesto tu:

Código: Text

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim a() As Short = {0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10}
        Dim b(10) As Integer
 
        For I As Byte = 0 To UBound(a)
            b(I) = Factorial(a(I))
        Next
    End Sub
 
    Function Factorial(ByVal N As Byte) As Integer
        Dim Total As Integer = 0
        If N &#62; 0 Then
            Total = 1
            For I As Byte = 1 To N
                Total *= I
            Next
        End If
        Return Total
    End Function
 

Ahora si lo que quieres es que el vector "a" se llene por medio de un bucle solo tendrias que declararlo asi como el vector "b" y agregarle desde el 0 hasta el 10 en el For del load, espero te sirva, recuerda que va a depender que no salga error de los tipos de datos que utilizes, nos vemos

PD. como veras no es en un proyecto de consola, solo tendrias que adaptarlo

Landxet · « **Respuesta #4 en:** Lunes 30 de Abril de 2007, 23:29 »

Muchas gracias por molestarte.
La verdad es que he empezado a aprender en una academia el lenguaje vb.net , es cierto q no me habia mirado mucho el libro, asi q me lo lei pero no se...

, para una persona q no ha visto programacion en su vida... El caso es que el ojetivo es entrar en ingenieria informatica(si, oyes bien, yo.., en ingenieria informatica

) el año que viene.La verdad es que es algo que me encanta pero viniendo de la nada.. en fin que me hice un poco la picha un lio, asi que lo dicho muchas gracias por todo

Nos vemos por aqui.

P.D.: Vere si soy capaz de adaptarlo

SoloCodigo

Autor Tema: Ayuda Por Favor Soy Un Negao (Leído 1703 veces)

Landxet

Ayuda Por Favor Soy Un Negao

Cajami

Re: Ayuda Por Favor Soy Un Negao

Landxet

Re: Ayuda Por Favor Soy Un Negao

Cajami

Re: Ayuda Por Favor Soy Un Negao

Landxet

Re: Ayuda Por Favor Soy Un Negao