read n k
ans=0
chk=0
if [ $n -le 2 ]
then
	echo 0
	exit
fi
for i in `seq 2 6`
do
	chk=$(( ((i * 3) + 21) * 3 ))
	for x in `seq 11`
	do
		if [ $((chk % 11)) -eq $k ]
		then
			ans1=$((n / 11))
			ans2=$((n % 11))
			if [ $((ans2 - 2)) -ge $x ]
			then
				ans1=$((ans1 + 1))
			fi
			ans=$((ans + ans1))
			continue 2
		fi
		chk=$((chk + 63))
	done
done
echo $ans
