Blog de Daiyiro

#BlogDeDaiyiro es sobre todo Bricolajes de Electrónica/Informática. ¡^-^¡

LO NUEVO:

14.10.13

Buscar El Máximo y Mínimo De Un Vector Con N Elementos

Vamos con otro ejercicio en Visual Basic, esta vez directamente en código de vb.net, el enunciado del problema dice así:



Escribir un algoritmo que busque el máximo valor y el mínimo dentro de un vector con N elementos. Imprimirlos junto con sus índices. N se ingresa por teclado.

Se puede realizar una aplicación similar con colecciones, si quieres echarle una ojeada puedes hacerlo en el siguiente link:


http://daiyiro.blogspot.com.es/2013/10/realizar-una-aplicacion-que-utilice.html


y el código para aplicacion de consola, seria así...


CÓDIGO EN VB.NET:

Module Module1

    Sub Main()

        Dim n As Integer = 0
        Dim maximo As Integer = 0
        Dim minimo As Integer = 9999999
        Dim posicionMaximo, posicionMinimo As Integer

        Console.WriteLine("Dime cuantas posiciones tiene el vector: ")
        n = Console.ReadLine

        Dim vector(n - 1) As Integer


        'Recorremos para informar el vector
        For i As Integer = 0 To n - 1
            Console.WriteLine("Dime el valor de la posición {0}", i + 1)
            vector(i) = Console.ReadLine
        Next


        'Recorremos el vector para sacar la información
        For i = 0 To n - 1

            If maximo < vector(i) Then
                maximo = vector(i)
                posicionMaximo = i + 1
            End If

            If minimo > vector(i) Then
                minimo = vector(i)
                posicionMinimo = i + 1
            End If
        Next


        Console.WriteLine("Mayor: {0} Posicion: {1}", maximo, posicionMaximo)
        Console.WriteLine("Menor: {0} Posicion: {1}", minimo, posicionMinimo)


        Console.ReadLine()

    End Sub

End Module



Espero que os sea interesante...

PD: Esto es lo que hice yo en la practica, no quiere decir por ello, que sea 100% correcto, puede ir encaminado, ser erróneo o no estar del todo finalizada la aplicación.

Un saludiioo.

No hay comentarios:

Publicar un comentario