Imports System
Public Class Test
Public Shared Sub Main()
Dim n As Integer
n = Console.ReadLine
Do While n <> 42
System.Console.WriteLine(n)
n = Console.ReadLine
Loop
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KIApQdWJsaWMgQ2xhc3MgVGVzdAoJUHVibGljIFNoYXJlZCBTdWIgTWFpbigpIAoJCURpbSBuIEFzIEludGVnZXIKCQluID0gQ29uc29sZS5SZWFkTGluZQoJCURvIFdoaWxlIG4gPD4gNDIKCQkJU3lzdGVtLkNvbnNvbGUuV3JpdGVMaW5lKG4pCgkJCW4gPSBDb25zb2xlLlJlYWRMaW5lCgkJTG9vcAoJRW5kIFN1YgpFbmQgQ2xhc3M=