Imports System
Public Class exercise054
Public Shared Sub Main()
Dim a, b As Integer
Dim operation As Char
Console.Write("Enter first number: ")
a = Convert.ToInt32(Console.ReadLine())
Console.Write("Enter operation: ")
operation = Convert.ToChar(Console.ReadLine())
Console.Write("Enter second number: ")
b = Convert.ToInt32(Console.ReadLine())
Select Case operation
Case "+"c
Console.WriteLine("{0} + {1} = {2}", a, b, a + b)
Case "-"c
Console.WriteLine("{0} - {1} = {2}", a, b, a - b)
Case "x"c, "*"c
Console.WriteLine("{0} * {1} = {2}", a, b, a * b)
Case "/"c
Console.WriteLine("{0} / {1} = {2}", a, b, a / b)
Case Else
Console.WriteLine("Wrong Character")
End Select
End Sub
End Class