Задания
Версия для печати и копирования в MS Word
Сколько существует 16-ричных четырёхзначных чисел, в записи которых ровно одна цифра D, при этом ни одна нечётная цифра не стоит рядом с цифрой D?
Решение.
Приведём решение на языке Python.
from itertools import product
count = 0
for i in product("0x2x4x6x8xAxCDEx", repeat = 4):
s = ''.join(i)
if s.count("D") == 1 and s[0] != "0":
if "Dx" not in s and "xD" not in s:
count += 1
print(count)
Ответ: 5216.
Приведём решение Сергея Донец на языке PascalABC.NET.
begin
(('0'..'9')+('A'..'F')).JoinToString.Cartesian(4)
.Where(s->s.CountOf('D')=1)
.Where(s->not s.IsMatch('[13579BDF]D'))
.Where(s->not s.IsMatch('D[13579BDF]'))
.Count(s->s[1] <> '0').Print;
end.