Programador Novato

La búsqueda Binaria en Visual Basic.NET es un algoritmo de búsqueda que encuentra la posición de un valor en un array ordenado. Compara el valor con el elemento en el medio del array, si no son iguales, la mitad en la cual el valor no puede estar es eliminada y la búsqueda continúa en la mitad restante hasta que el valor se encuentre.

Codigo: https://github.com/programadornovato/VisualBasic/commit/2843c473ace99b88de98b33947b597e2468a43c7

Imports System

'Autor: Programador Novato
'Fecha: 01/01/2021
'Este modulo sirve para ense�ar como funciona Visual Basic.NET
Module Program
    'Este codigo escribe un texto en amarillo con fondo azul
    Public Sub Main(args As String())
        Console.WriteLine("Humano ingresa el valor objetivo")
        Dim numeroBuscar = Integer.Parse(Console.ReadLine())
        Dim listaNumeros = New Integer(6) {}
        For i = 0 To listaNumeros.Length - 1
            Console.WriteLine("Humano ingresa el valor del elemento " & i + 1)
            listaNumeros(i) = Integer.Parse(Console.ReadLine())
        Next
        Dim n = listaNumeros.Length
        Dim inf = 0
        Dim centro = 0
        Dim sup = n - 1
        Dim bandera = False
        Dim cont = 0
        While inf <= sup
            centro = (sup + inf) / 2
            If listaNumeros(centro) = numeroBuscar Then
                bandera = True
                Exit While
            ElseIf numeroBuscar < listaNumeros(centro) Then
                sup = centro - 1
            ElseIf numeroBuscar > listaNumeros(centro) Then
                inf = centro + 1
            End If
            cont = cont + 1
        End While
        If bandera = True Then
            Console.WriteLine("El numero " & numeroBuscar & " se encuentra en la posicion " & centro + 1)
        Else
            Console.WriteLine("Humano estupi el numero no se encuentra en la lista")
        End If
        Console.WriteLine("Vueltas = " & cont)
        Console.Read()
    End Sub
End Module

Curso de VB.NET⛓️: https://www.youtube.com/watch?v=aiquJHzxNWw&list=PLCTD_CpMeEKSFwAFjvrfpvSwxmbs2maMo&ab_channel=programadornovato
[CURSO] C##️⃣: https://www.youtube.com/watch?v=NKPMGY6NCko&list=PLCTD_CpMeEKQSOU8Vf9VHXrZa2rc8X0X5&index=1&t=3s&ab_channel=programadornovatoprogramadornovato
[CURSO] C# CON FORMULARIOS#️⃣: https://www.youtube.com/watch?v=l0_U4oyOuns&list=PLCTD_CpMeEKTBih1VgeunCjc83ZQ6UBMI&index=1&ab_channel=programadornovatoprogramadornovato
[Curso] C# MYSQL#️⃣: https://www.youtube.com/watch?v=-5CXNXHIzWk&list=PLCTD_CpMeEKR_4q0-7BxGHXqH0bgpqw5q&ab_channel=programadornovato
[CURSO] C++ DE 0 A HEROE 🦸: https://www.youtube.com/watch?v=APN8aCyPvww&list=PLCTD_CpMeEKTofxs7iottRxJ5YPM7BOcc&ab_channel=programadornovato
[Curso] Java Netbeans GUI Completo☕: https://www.youtube.com/watch?v=18UA7X2ss8g&list=PLCTD_CpMeEKThfXo8D-RXOGu5FarO7_qv&ab_channel=programadornovato

Anterior tutorial Siguiente tutorial