Imports System
Public Module Module1
Public Sub Main()
Dim i as integer
For i = 0 to 1
Dim s as string
s = console.readline()
Dim ans() as string
ans = s.Split(",")
If ans(0) >= 100
If ans(2) >= 100
Do
Console.WriteLine("enter again")
loop until ans(0) < 100
end if
Dim n as integer
For n = 0 to 1
Console.WriteLine(ans(n))
next
End Sub
End Module