Imports System

Public Module Module1

    Public Sub Main()

        'Food

        Dim fType as integer

        Dim fDesc as string

        dim fQuan as integer

        dim fPrice as integer

        'Side

        dim sType as integer

        dim sDesc as string

        dim sPrice as integer

        'Drink

        Dim dType as integer

        Dim dDesc as string

        dim dQuan as integer

        dim dPrice as integer

        dim total as decimal

        'Show food menu

        console.writeline("Welcome to McRonald's. To begin, enter the food you would like.")

        console.writeline("1) Burger ($6)")

        console.writeline("2) Chicken Nuggets ($5)")

        console.writeline("3) Sundae ($2)")

        'Let user pick food

        fType = console.readline()

        'Let user pick quantity of food

        console.writeline("Enter the amount you would like:")

        fQuan = console.readline()

        'Calculate food price

        if fType = 1 then

            fPrice = 6

            fDesc = "Burger"

        else if fType = 2 then

                fPrice = 5

                fDesc = "Chicken Nuggets"

        else  

                fPrice = 2

                fDesc = "Sundae"

        end if

        'Let user pick side

        console.writeline("Select a side")

        console.writeline("4) Fries ($3)")

        console.writeline("5) Chips ($5)")

        console.writeline("6) None")

        sType = console.readline()

        'Calculate Side

            if sType = 4 then

                sPrice = 3

                sDesc = "Fries"

            else if sType = 5 then

                sPrice = 5

                sDesc = "Chips"

            else

                sPrice = 0

                sDesc = "No side"

            end if

        'Show drink menu

        console.writeline("Select a drink you would like:")

        console.writeline("7) Diet Code ($2)")

        console.writeline("8) Apple Juice ($3)")

        console.writeline("9) Water (Free)")

        'Let user pick drink

        dType = console.readline()

        'Let user pick quantity of drink

        console.writeline("Enter the amount of drinks you would like:")

        dQuan = console.readline()

        'Calculate drink

                if dType = 7 then

                    dPrice = 2

                    dDesc = "Diet Code"

                else if dType = 8 then

                    dPrice = 3

                    dDesc = "Apple Juice"

                else

                    dPrice = 0

                    dDesc = "Water"

                end if

        'Calculate Total

                    total = fPrice*fQuan+sPrice+dPrice*dQuan*1.70

        'Display total

                    console.writeline("You bought {0} {1} with {2}, and {3} drink/s of {4}.", fQuan, fDesc, sDesc, dQuan, dDesc)

                    console.writeline("Your total with tax is {0}", total)

    End Sub

End Module