Imports System

​

Public Class Program

​

    Public Shared Sub Main()

        Console.WriteLine("Ingrese uno de los productos")

        Dim prod As String = Console.ReadLine()

        If prod = "arroz" OrElse prod = "lentejas" Then

            Console.WriteLine("El producto " & prod & " no paga iva")

        ElseIf prod = "crema" OrElse prod = "vino" Then

            Console.WriteLine("el producto" & prod & "tiene iva")

        Else

            Console.WriteLine("El producto no existe en el almacen")

        End If

    End Sub

End Class

​