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