' Online VB Compiler.
' Code, Compile, Run and Debug VB program online.
' Write your code in this editor and press "Run" button to execute it.
Module VBModule
Sub Main()
dim x as Double = 199025 / CType((1 << 19) * 360.0 - 180, Double)
Console.WriteLine(x)
End Sub
End Module