fork download
  1. Imports System
  2.  
  3. Public Class Test
  4. Public Shared Sub Main()
  5. Dim n As Integer
  6. n = Console.ReadLine
  7. Do While n <> 42
  8. System.Console.WriteLine(n)
  9. n = Console.ReadLine
  10. Print(1, "This is a test.")
  11. Loop
  12. End Sub
  13. End Class
Internal error #stdin #stdout 0s 0KB
stdin
30
stdout
Standard output is empty