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

Сколь­ко су­ще­ству­ет раз­лич­ных пя­ти­знач­ных чисел, за­пи­сан­ных в две­на­дца­те­рич­ной си­сте­ме счис­ле­ния, в за­пи­си ко­то­рых есть толь­ко три нечётные цифры, причём оди­на­ко­вые и сто­я­щие рядом?

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

Ре­ше­ние.

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

from itertools import product

otv = 0

for i in product('0123456789ab', repeat=5):

if i[0] != '0':

necet = [x for x in i if x in '13579b']

if len(set(necet)) == 1 and len(necet) == 3:

if necet[0]*3 in ''.join(i):

otv += 1

print(otv)

 

Ответ: 576.

 

При­ведём ре­ше­ние Бо­ри­са Са­ве­лье­ва на языке Python.

from itertools import product

s=product('02468AН' , repeat =5)

k=0

for i in s:

p=''.join(i)

if p[0]!='0' and p.count('Н')==3 and 'ННН' in p:

k+=1

print(k*6)

 

 

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

begin

'0123456789ab'.Cartesian(5)

.Where(s-> s.IsMatch('([13579b])\1{2}'))

.Where(s-> s.Count(c->c in'13579b') = 3)

.Count(s-> s[1] <> '0').Print;

end.


Аналоги к заданию № 87399: 87426 Все