fork download
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim number as Integer
  6. Dim Squared as Integer
  7. Dim Answer as Integer
  8. ControlChars.Tab & "Number" & ControlChars.Tab & "Squared"
  9. For Answer = 1 to 10
  10. number = Answer
  11. Squared = number * 2
  12. ControlChars.Tab & number & ControlChars.Tab & Squared
  13. Next Answer
  14. End Sub
  15. End Class
Success #stdin #stdout 0.02s 24080KB
stdin
Standard input is empty
stdout
Standard output is empty