Imports System
Public Class Test
Public Shared Sub Main()
Dim x As Int32 = 189
Dim y As Int32 = CInt(Math.Floor(x / 100))
Console.Write(y)
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKCQkgRGltIHggQXMgSW50MzIgPSAxODkKICAgICAgICAgRGltIHkgQXMgSW50MzIgPSBDSW50KE1hdGguRmxvb3IoeCAvIDEwMCkpCiAgICAgICAgIENvbnNvbGUuV3JpdGUoeSkKCUVuZCBTdWIKRW5kIENsYXNz