Imports System

Public Module Module1

    Public Sub Main()

        Dim n as integer

        Console.WriteLine("Ingresa tu nota (0-10) :")

        n = CInt(Console.ReadLine())

        if n = 9 or n = 10

            Console.WriteLine("Tu nota es: A")

            elseif n = 6 or n = 7 or n = 8

            Console.WriteLine("Tu nota es: B")

            elseif n = 3 or n = 4 or n = 5

            Console.WriteLine("Tu nota es: C")

            elseif n = 1 or n = 2

            Console.WriteLine("Tu nota es: D")

            elseif n = 0

            Console.WriteLine("Tu nota es: E")

            else 

            Console.WriteLine("Ingrese una nota válida.")

        End If

    End Sub

End Module