($m,$d,$k)=glob<>;
for(0..6){
	\$a{$_%10}for$m/10,$m,$d/10,$d;
	if(++$d>31-($m-2?2640>>$m&1:3)){
		$d=1;
		$m=$m%12+1;
	}
}
print%a<$k?No:Yes;