Imports System
Public Class Test
Public Shared Sub Main()
Dim N as integer
Console.Write("Digite número:")
N=Convert.ToInt32(Console.ReadLine())
If(N>0) Then
Console.WriteLine("Positivo")
Else
If(N<0) Then
Console.WriteLine("Negativo")
Else
if(N=0) then
Console.WriteLine("Neutro")
Else
End If
End If
End If
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkKICAgIERpbSBOIGFzIGludGVnZXIKICAgIENvbnNvbGUuV3JpdGUoIkRpZ2l0ZSBuw7ptZXJvOiIpCiAgICBOPUNvbnZlcnQuVG9JbnQzMihDb25zb2xlLlJlYWRMaW5lKCkpCiAgICBJZihOPjApIFRoZW4KICAgIENvbnNvbGUuV3JpdGVMaW5lKCJQb3NpdGl2byIpCiAgICBFbHNlCiAgICBJZihOPDApIFRoZW4KICAgIENvbnNvbGUuV3JpdGVMaW5lKCJOZWdhdGl2byIpCiAgICBFbHNlCiAgICBpZihOPTApIHRoZW4KICAgICAgQ29uc29sZS5Xcml0ZUxpbmUoIk5ldXRybyIpCiAgICAgIEVsc2UKICAgIEVuZCBJZgogICAgRW5kIElmCiAgICBFbmQgSWYKCUVuZCBTdWIKRW5kIENsYXNz