fork download
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim N as integer
  6. Console.Write("Digite numero")
  7. N=Convert.ToInt32(Console.ReadLine())
  8. if(N>0) then
  9. Console.WriteLine("El numero es positivo")
  10. else
  11. if(N<0) then
  12. Console.WriteLine("El numero es negativo")
  13. else
  14. if(N=0) then
  15. Console.WriteLine("El numero es neutro")
  16. end if
  17. end if
  18. end if ' your code goes here
  19. End Sub
  20. End Class
Success #stdin #stdout 0.07s 13368KB
stdin
17
stdout
Digite numeroEl numero es positivo