TOP

Visual Basic Consola - Selección 02




02.  Ingresar 2 números enteros y un operador (+, -, x, /); según el operador ingresado mostrar la operación matemática correspondiente.



Imports System.Console
Module Module2
    Dim num1, num2, operador
    Sub Main()
        Write("Ingrese Primer Número : ")
        num1 = ReadLine()
        Write("Ingrese Segundo Número : ")
        num2 = ReadLine()
        Write("Ingrese Operador (+ - x /) : ")
        operador = ReadLine()
        Select Case operador
            Case "+" : WriteLine("Suma : " & (num1 + num2))
            Case "-" : WriteLine("Resta : " & (num1 - num2))
            Case "x" : WriteLine("Multiplicación : " & (num1 * num2))
            Case "/" : WriteLine("Divición : " & (num1 / num2))
            Case Else : WriteLine("Operador Incorrecto")
        End Select
        ReadLine()
    End Sub
End Module

share_facebook

DAME UN ME GUSTA - SI VALORAS ESTE CÓDIGO



0 comentarios:

Publicar un comentario

Danos tu opinión o déjanos tu ejercicio! - Algoritmos, pseudocódigo y lo pasamos a Visual Basic consola.