Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("Enter the equation in the form (ax + b) / (dx + e")

        Console.WriteLine("Enter value a")

        Dim a as integer = console.ReadLine()

        Console.WriteLine("Enter value b")

        Dim b as integer = console.ReadLine()

        Console.WriteLine("Enter value d")

        Dim d as integer = console.ReadLine()

        Console.WriteLine("Enter value e")

        Dim e as integer = console.ReadLine()

        Dim topeq11 as integer 

        Dim topeq12 as integer

        topeq11 = a * d

        topeq12 = a * e

        Dim topeq21 as integer 

        Dim topeq22 as integer

        topeq21 = d * a

        topeq22 = d * b

        Console.WriteLine("The final equation is ("

    End Sub

End Module