Imports System
'Make a fast food menu that asks and adds up the total with tax of 7%
Public Module Module1
Public Sub Main()
'#1
Dim num as Integer
Console.WriteLine("Type a Number")
num = Console.ReadLine()
if num = 50 then
Console.WriteLine("Just Right")
else if num < 50 then
Console.WriteLine("Too Low")
else if num > 50 then
Console.WriteLine("Too High")
end if
'#2
for i = 101 to 200 step 2
Console.WriteLine(i)
next
'#3
for r = 1 to 10
for c = 1 to 9
Console.Write(c)
Console.WriteLine()
End Sub
End Module