Imports System

Public Module Module1

    Public Sub Main()

        dim x as string

        x = console.readline()

        if x.Length > 6 and x.Length<2

        console.writeline(x.ToUpper())

        else console.writeline("invalid")

        end if

    End Sub

End Module