Public Class Application
	Public Shared Sub Main()
		
		Dim PlayerOneScore As Integer = 0
		Dim PlayerTwoScore As Integer = 0
		
		Console.WriteLine("How many games?")
		
		Dim NoOfGamesInMatch As Integer = CInt(Console.ReadLine())
		
		For NoOfGamesPlayed As Integer = 1 To NoOfGamesInMatch
			Console.WriteLine("Did Player One win the game (enter Y or N)?")
			Dim PlayerOneWinsGame As Char = Console.ReadLine()
			
			If PlayerOneWinsGame = "Y" Then
				PlayerOneScore = PlayerOneScore + 1
			Else
				PlayerTwoScore = PlayerTwoScore + 1
			End if
		Next 
		
		Console.WriteLine("Player One's Score was: " & PlayerOneScore)
		Console.WriteLine("Player Two's Score was: " & PlayerTwoScore)
		
	End Sub
End Class