Imports System

Public Module Module1

    Sub Main()

        Dim hours as Integer 

        Dim cars as Integer

        Dim wages as Decimal

        Console.WriteLine("Enter how many hours you have worked today: ")

        hours = console.readline 

        Console.writeline("Enter how many toy cars you have made today: ")

        cars = console.readline

        wages = 9*hours + 0.6*cars

        console.writeline(("Your wage for today is: £") & wages)

    End sub 

End Module