Module Module1

Sub Main()
Dim Nilai As Single
Console.Write(“M asukkan NIlai Akhir:”)
Nilai = Console.ReadLine()
If Nilai >= 85 Then
Console.WriteLine(“A”)
ElseIf Nilai >= 70 Then
Console.WriteLine(“B”)
ElseIf Nilai >= 60 Then
Console.WriteLine(“C”)
ElseIf Nilai >= 25 Then
Console.WriteLine(“D”)
Else
Console.WriteLine(“E”)
End If
End Sub

End Module