Imports System

Public Module Module1

    Public Sub Main()

        dim input as decimal

        input = console.readline()

        console.writeline(ceiling(input))

    end sub

End Module

​

module myfunctions

    function ceiling(input as decimal) as integer

        dim int as integer = input

        if input - int > 0

            int = int + 1

        end if

        return int

    end function

end module

​