Imports System
Public Module Module1
Public Sub Main()
Console.WriteLine("Hello World")
dim Mark as integer
Mark=0
console.WriteLine("Enter Mark")
Mark=console.ReadLine()
If Mark>=80 and Mark<=100 Then
console.WriteLine("A")
End if
If Mark>=60 and Mark<=79 Then
console.WriteLine("B")
If Mark>=50 and Mark<59 Then
console.WriteLine("C")
If Mark>=0 and Mark<=49 Then
console.WriteLine("Fail")
End Sub
End Module