Imports System

​

Public Module Module1

​

    Public Sub Main()

        dim flag as integer

        dim weight as decimal

        dim length as decimal

        dim width as decimal

        dim height as decimal

        dim total as decimal

        console.writeline("Enter dimensions of parcel (L,W,H) and weight of parcel")

        console.write("length: ") : length = console.readline()

        console.write("width: ") : width = console.readline()

        console.write("height: ") : height = console.readline()

        console.write("weight: ") : weight = console.readline()

        if length > 80 then

            flag = flag + 1

            console.writeline("length exceeds 80")

        else if length <= 0 then

            flag = flag + 1

            console.writeline("length is below 0")

        end if

​

        if width > 80 then

            flag = flag + 1

            console.writeline("width exceeds 80")

        else if width <= 0 then

            flag = flag + 1

            console.writeline("length is below 0")

        end if

​

        if height > 80 then

            flag = flag + 1

            console.writeline("height exceeds 80")

        else if height <= 0 then

            flag = flag + 1

            console.writeline("length is below 0")

        end if

​

        if weight > 10 then

            flag = flag + 1

            console.writeline("weight exceeds 10kg")

        else if weight < 1 then

            flag = flag + 1

            console.writeline("weight cannot be below 1kg")

        end if

​

        total = length + width + height

        console.write("total dimension is: ") : console.writeline(total)

        if total > 200 then

            flag = flag + 1

            console.writeline("dimensions exceed 200cm")

        end if

​

        if flag > 1 then

            console.writeline("rejected")

        else

            console.writeline("accepted")

        end if

    End Sub

End Module

​