Imports System

Public Module Module1

    Public Sub Main()

        dim x as string = console.ReadLine()

        dim i as integer

        for i = 0 to x.Length - 1

        if (x(i) = " ")

            console.Write("_")

        else

            console.Write(x(i))

        end if

    next

    End Sub

End Module