Imports System, Microsoft.VisualBasic

'Josh LaRusso

'10/20/21

'TotalChange Program

Public Module Module1

    Public Sub Main()

        dim hundredDollar as single

        dim fiftyDollar as single

        dim twentyDollar as single

        dim tenDollar as single

        dim fiveDollar as single

        dim dollars as single

        Dim quarters As Single          'step 1: declare variables

        Dim dimes As Single

        Dim nickels As Single

        Dim pennies As Single

        Dim totalCost As Single

        Console.WriteLine("How many hundred dollar bills do you have?")

        hundredDollar = Console.ReadLine()

        Console.WriteLine("How many fifty dollar bills do you have?")

        fiftyDollar = Console.ReadLine()

        Console.WriteLine("How many twenty dollar bills do you have?")

        twentyDollar = Console.ReadLine()

        Console.WriteLine("How many ten dollar bills do you have?")

        tenDollar = Console.ReadLine()

        Console.WriteLine("How many five dollar bills do you have?")

        fiveDollar = Console.ReadLine()

        Console.WriteLine("How many one dollar bills do you have?")

        dollars = Console.ReadLine()

        Console.WriteLine("How many quarters do you have?")         'step 2: get user inputs

        quarters = Console.ReadLine()

        Console.WriteLine("How many dimes do you have?")

        dimes = Console.ReadLine()

        Console.WriteLine("How many nickels do you have?")

        nickels = Console.ReadLine()

        Console.WriteLine("How many pennies do you have?")

        pennies = Console.ReadLine()

        totalCost = 100.00 * hundredDollar + 50.00 * fiftyDollar + 20.00 * twentyDollar + 10.00 * tenDollar + 5.00 * fiveDollar + 1.00 * dollars + .25 * quarters + .10 * dimes + .05 * nickels + .01 *pennies      'step 3: calculations

        Console.WriteLine("Your total is: " & FormatCurrency(totalCost))        'step 4: print total

    End Sub

End Module