imports System

Public Module Module1

Public Sub Main()

                        dim papa, Vpapa as double

                        dim tomate, Vtomate as double

                        dim cebollaB,VcebollaB as double

                        dim cebollaR, VcebollaR as double

                        dim papaC, VpapaC as double

                        dim PlatanoV,VplatanoV  as double

                        dim PlatanoA, VplatanoA as double

                        dim TOTAL as double

                        console.WriteLine("Ingrese el peso de la papa")

                        papa=console.ReadLine()

                        console.WriteLine("Ingrese el peso del tomate de cocina")

                        tomate=console.readline()

                        console.WriteLine("Ingrese el peso de la cebolla blanca")

                        cebollaB=console.readline()

                        console.WriteLine("Ingrese el peso de la cebolla roja")

                        cebollaR=console.readline()

                        console.WriteLine("Ingrese el peso de la papa criolla")

                        papaC=console.readline()

                        console.WriteLine("Ingrese el peso del platano verde")

                        platanoV=console.readline()

                        console.WriteLine("Ingrese el peso del platano amarillo")

                        platanoA=console.readline()

                        if(papa = 500)

                                    vpapa=800

                         elseif ( papa = 1000)

                          Vpapa=1600

                           else

                                    console.WriteLine("El peso ingresado no es correcto")                              

                        end if

                        if( tomate = 500)

                                    Vtomate=1200

                          elseif ( tomate = 1000)

                                     Vtomate=2400

                        else

                console.WriteLine("El peso ingresado no es correcto")

                        end if

                        if( cebollaB = 500)

                                    VcebollaB=700

                        elseif ( cebollaB = 1000)

                                    VcebollaB=1400

                        else

                        console.WriteLine("El peso ingresado no es correcto")      

                        end if

                        if( cebollaR = 500)

                                    VcebollaR=650

                        elseif ( cebollaR = 1000)

                                    VcebollaR=1300

                        else

                        console.WriteLine("El peso ingresado no es correcto")      

                        end if

                        if( papaC = 500)

                                    VpapaC=1200

                        elseif ( papaC = 1000)

                                    VpapaC=2400

                        else

                        console.WriteLine("El peso ingresado no es correcto")      

                        end if

                        if( platanoV = 500)

                                    VplatanoV=1000

                        elseif ( platanoV = 1000)

                                    VplatanoV=2000

                        else

                        console.WriteLine("El peso ingresado no es correcto")      

                        end if

                        if( platanoA = 500)

                                    VplatanoA=800

                        elseif ( platanoA = 1000)

                                    VplatanoA=1600

                        else

                        console.WriteLine("El peso ingresado no es correcto")      

                        end if

                        TOTAL=Vpapa+Vtomate+VcebollaB+VcebollaR+VpapaC+VplatanoV+VplatanoA

                        console.WriteLine("El total de la compra es:" & TOTAL & "$")

            End Sub 

​

​