Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("cuadrado")

        dim a, l as integer 

        console.WriteLine("medidas de lado")

        l = console.ReadLine()

        a = l *  4

        console.WriteLine("el area del cuadrado es: " & a)

    End Sub

End Module