40

Ejercicio 11.- Identificar un palindromo en Visual Basic.NET [40]

En este tutorial vamos a Identificar un palindromo en Visual Basic.NET, por si no lo sabes, un palíndromo es una palabra o frase que se puede leer igual al derecho y alreves. En este tutorial vamos a identificar si una frase es un palíndromo o no con los siguientes pasos:

  • Pedir al humano que ingrese un texto.
  • Convertimos el texto a minúsculas.
  • Quitaremos espacios en blanco.
  • Obtener la longitud del texto.
  • Crear un ciclo inverso con la longitud del texto donde.
  • Compararemos la primer letra con la última.
  • Compararemos la segunda letra con la penúltima y así sucesivamente.
  • Si alguna comparación es falsa no es palindromo de lo contrario si es.
  • Mostrará la humano si el texto introducido es palindromo o no.
  • Un ejemplo de palíndromo es: “anita lava la tina”

Codigo para identificar un palindromo en Visual Basic.NET: https://github.com/programadornovato/VisualBasic/commit/33ddc66c658e5b926cdc74f44ad4cf5cba021512

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 un palindromo")
        Dim texto = Console.ReadLine()
        Dim textoCopia = texto
        If texto IsNot Nothing Then
            texto = texto.ToLower()
            texto = texto.Replace(" ", "")
            Dim longitud = texto.Length
            Dim igual = True
            Dim cont = 0
            For indice = longitud - 1 To 0 Step -1
                If (texto(indice) <> texto(cont)) Then
                    igual = False
                    Exit For
                End If
                cont = cont + 1
            Next
            If igual = True Then
                Console.WriteLine("Felicidades humano el texto " & textoCopia & " si es palindromo")
            Else
                Console.WriteLine("Humano estupido el texto " & textoCopia & " no es palindromo")
            End If
        Else
            Console.WriteLine("humano estupido te pedi que ingresarar un palindo y no escribiste nada")
        End If
        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

Ads Blocker Image Powered by Code Help Pro

Ads Blocker Detected!!!

En Programador Novato vivimos de los anuncios, hemos detectado que está utilizando extensiones para bloquear anuncios. Ayudanos deshabilitando tu bloqueador de anuncios. :)