Imports System

Public Module Module1

    Public Sub Main()

        Dim dato1 as integer

        dim dato2 as double

        dim dato3 as double

        console.WriteLine("ingrese cantidad de kilometros recorridos ")

        dato1 = console.ReadLine()

        console.WriteLine("ingrese litros de combustible gastados " )

        dato2= console.ReadLine()

        dato3= dato1 / dato2

        console.WriteLine("El consumo por kilometro es de :" & dato3)

    End Sub

End Module