Ejercicios en Visual Basic .NET

certificacion google ads, autocad para mac, Curso de C, ingles facil, curso marketing digital google, Curso de creación de páginas Web

DESARROLLAMOS TUS ALGORITMOS (+51) 954263896

08. Ingrese tres números enteros y muestre el número intermedio.

DESCARGA CÓDIGO

VISUAL BASIC .NET - CONSOLA

    
Imports System.Console
Module Ejercicio08
    Dim N1, N2, N3, Medio, XTem As Integer
    Sub Main()
        WriteLine("08. MOSTRAR EL NÚMERO MEDIO DE 3 NÚMEROS INGRESADOS.")
        WriteLine("")
        Write("Igrese Número 1 : ")
        N1 = ReadLine()
        Write("Igrese Número 2 : ")
        N2 = ReadLine()
        Write("Igrese Número 3 : ")
        N3 = ReadLine()
        WriteLine("")
        If (N1 > N2) Then
            Medio = N1
            XTem = N2
        Else
            Medio = N2
            XTem = N1
        End If
        If (Medio > N3) Then
            Medio = N3
        End If
        If (Medio < XTem) Then
            Medio = XTem
        End If
        WriteLine("El Número Medio es : " & Medio)
        ReadLine()
    End Sub
End Module
    


Aviso de Privacidad | Política de Cookies | Términos y condiciones

Derechos Reservados PSeInt.site