begin
var ss := ReadSeqInteger(ReadlnInteger('n ='));
ss.Count(x -> (x > 0) and (x mod 5 = 0)).Println;
end.
<span>eabab ПЕРВАЯ ГЛАСНАЯ, А ПОСЛЕДНЯЯ СОГЛАСНАЯ</span>
Гласная у нас только Ё
потому слова имеют вид ЁхххЁ, ЁххЁ, ЁхЁ, ЁЁ и Ё где х - одна из <span>Ё, К, Л, М, Н
ограничений на повторения не было
Для </span>ЁхххЁ <span>шаблона:
Значит у нас 3 вакантных места и в каждое можно посадить 1 из 5 символов, всего вариантов = 5*5*5 = 5^3 = 125 вариантов
Для </span>ЁххЁ шаблона: 5*5 = 5^2 = 25 вариантов
Для ЁхЁ шаблона: 5 = 5^1 = 5 вариантов
ЁЁ и Ё статичны - по одному
Суммируем: 125+25+5+1+1 = 157 вариантов слов