Imports System

Public Module Module1

    Public Sub Main()   

        dim names() as string = {"Alice" , "Biyuan" , "Chirag" }

        dim Alice(0 to 6) as decimal

        dim alitot as decimal

        dim Biyuan(0 to 6) as decimal

        dim biytot as decimal 

        dim Chirag(0 to 6) as decimal

        dim chitot as decimal 

        dim days() as string = {"monday","tuesday" , "wednesday" , "thursday" , "friday" , "satday" , "sunday"}

        dim multi() as decimal = {1, 1 , 1 , 1 , 1 , 1.5 , 2}

        dim moneys() as decimal = {17 , 20.50}

        dim input as decimal =0

        for g =  0 to 2

            for i = 0 to 6

                console.writeline("please enter " & names(g) & "'s hours for " & days(i))

                input = console.readline()

                if input >= 0 and input <= 12

                    if names(g) = "Alice" 

                        Alice(i) = input * multi(i) * moneys(0) 

                        alitot = alitot + alice(i)

                    end if 

                    if names(g) = "Biyuan" 

                        Biyuan(i) = input * multi(i) * moneys(0) 

                        biytot = biytot + alice(i)

                    end if  

                    if names(g) = "Chirag" 

                        Chirag(i) = input * multi(i) * moneys(1) 

                        chitot = chitot + alice(i)

            end if  

        end if

        next 

    next

        console.writeline("Alice should be paid $" & alitot)

        console.writeline("Biyuan should be paid $" & biytot)

        console.writeline("Chirag should be paid $" & chitot)

    End Sub

    End module

​