'Author: Satvik Suresh

'Program: Wage Calculator Assignment

'Date: 11/16/21

​

Imports System, Microsoft.VisualBasic

Public Module Module1

    Public Sub Main()

        'Step 1: Declare Variables

        Dim hoursWorked, hourlyPay, grossPay As Single

        'Step 2: Get user input

        Console.Write("Enter hourly pay rate: ")

        hourlyPay = Console.ReadLine()

        Console.Write("Enter hours worked: ")

        hoursWorked = Console.ReadLine()

        'Step 3: Calculations/Conditionals

        if hoursWorked > 40 Then

            grossPay = (hourlyPay * 40) + ((1.5 * hourlyPay) * (hoursWorked - 40))

        ElseIf hoursWorked < 40 Then

            grossPay = hourlyPay * hoursWorked

        End if

        'Step 4: Output

        Console.WriteLine("Gross Pay: " & FormatCurrency(grossPay))

    End Sub

End Module