Задания
Версия для печати и копирования в MS Word
Тип 8 № 84702
i

Опре­де­ли­те ко­ли­че­ство 14-⁠рич­ных ше­сти­знач­ных чисел, в за­пи­си ко­то­рых со­дер­жит­ся не менее одной цифры 4 и ровно две цифры с чис­ло­вым зна­че­ни­ем, пре­вы­ша­ю­щим 10, причём сто­я­щие рядом.

Спрятать решение

Ре­ше­ние.

При­ведём ре­ше­ние на языке Python.

from itertools import product

count = 0

for i in product("0123456789Axxx", repeat = 6):

s = ''.join(i)

if s.count("4") >= 1 and s[0] != "0":

if s.count("x") == 2 and "xx" in s:

count += 1

print(count)

 

Ответ: 196929.

 

При­ведём ре­ше­ние Сер­гея Донец на языке PascalABC.NET.

begin

'0123456789axxx'.Cartesian(6)

.Where(s->s[1] <> '0')

.Where(s->s.CountOf('4')>=1)

.Where(s->s.CountOf('x')=2)

.Where(s->s.IsMatch('[x][x]'))

.Count.Print;

end.