Imports System

Public Module Module1

    Public Sub Main()

        Dim name as string

        console.write("Employee's Name: ")

        name = console.readline

        Dim  grosspay,sss,netpay, total,  philhealth, deduction, rate,workingdays, absencesdays, basicgross, absencesamount as integer

        console.write("Total No. of Working Days: ")

        workingdays = console.readline

        console.write("Rate: ")

        rate = console.readline

        console.write("Absences In Days: ")

        absencesdays = console.readline

        console.writeline("---------------------")

        basicgross = workingdays * rate

        console.writeline("Basic Gross: " & basicgross)

        absencesamount = rate * absencesdays

        console.writeline("Absences Amount: " & absencesamount)

        grosspay = basicgross - absencesamount

        console.writeline("Gross Pay: " & grosspay)

        console.writeline("---------------------")

        console.writeline("Mandatory Deduction: ")

        console.writeline("---------------------")

        console.write("SSS: ")

        sss = console.readline

        console.write("PhilHealth: ")

        philhealth = console.readline

        console.writeline("---------------------")

        console.writeline("---Payslip Summary---")

        console.writeline("---------------------")

        total = deduction + grosspay

        console.writeline("Gross Pay: " & total)

        deduction = sss + philhealth

        console.writeline("Mandatory Deds.: " & deduction)

        netpay = grosspay - deduction

        console.writeline("Net Pay: " & netpay)

    End Sub

End Module