Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("Hello World")

        Dim n1 as decimal

        n1 = Console.Readline

        if ( n1 mod 5 = 0)

            Console.Writeline("is a multiple of 5")

        else 

            Console.Writeline("not a multiple of 5")

        end if

    End Sub

End Module