func main()
	var n: int :: cui@inputInt()
	var map: dict<char, int> :: #dict<char, int>
	for i(1, n)
		var a: char :: cui@inputStr()[0]
		do map.add(a, map.get(a, &) + 1)
	end for
	for i(1, n - 1)
		var b: char :: cui@inputStr()[0]
		do map.add(b, map.get(b, &) - 1)
	end for
	var colors: [][]char :: ["Red", "Orange", "Yellow", "Green", "Cyan", "Blue", "Violet"]
	for i(0, ^colors - 1)
		if(map.get(colors[i][0], &) = 1)
			do cui@print("\{colors[i]}\n")
		end if
	end for
end func