N = gets.to_i
a, b, c = gets.split(" ").map{|s| s.to_i}


s = {0=>true}
sum = 0
gets.split(" ").map{|s| s.length}.each{|j|
	sum += j
	s[sum] = true
}

cnt = 0
s.each {|y, i|
	cnt += 1 if s.include?(y-a) and s.include?(y+b) and s.include?(y+b+c)
}

puts cnt