Imports System

Public Module Module1

    Public Sub Main()

        console.WriteLine("Enter a number")

        dim cents as integer = console.ReadLine()

        dim quarters as integer = (cents \ 25)

        dim cents2 as integer = (cents-(quarters*25))

        dim dimes as integer = (cents2 \ 10)

            dim cents3 as integer = (cents2-(dimes*10))

        dim nickles as integer = (cents3 \ 5)

        dim cents4 as integer = (cents3-(nickles*5))

        dim pennies as integer = (cents4 \ 1)

        console.Write(quarters)

        console.Writeline(" quarters")

        console.Write(dimes)

        console.Writeline(" dimes")

        console.Write(nickles)

        console.writeline(" nickles")

        console.Write( pennies )

        console.write(" pennies")

    End Sub

End Module