Imports System

'APLICACION DE CONVERSIONES DE LONGITUD

'REALIZADO POR Carol Elias 

Public Module Module1

    Public Sub Main()

        'DECLARACION DE VARIABLES

        DIM METROS AS INTEGER

        DIM PIES AS INTEGER

        DIM KM AS DOUBLE

        DIM MILLAS AS DOUBLE

        'ENTRADAS

        Console.WriteLine("INGRESE CANTIDAD EN METROS: ")

        METROS = CONSOLE.ReadLine()

        'PROCESOS

        PIES = METROS *3.281

​

        KM = METROS /1000

        MILLAS = METROS /1609.3

        'SALIDAS

        CONSOLE.WriteLine("LA CANTIDAD EN PIES ES: " &PIES)

        CONSOLE.WriteLine("LA CANTIDAD EN KM ES: " &KM)

        CONSOLE.WriteLine("LA CANTIDAD EN MILLAS ES: " &MILLAS)

    End Sub

End Module