Question

Рассмотрим последовательность 1, 11, 21, 1211, 111221, …. Каждое последующее число последовательности получается следующим образом: для каждой группы идущих подряд одинаковых цифр (даже если это одна цифра) пишется количество цифр в этой группе и сама цифра. Так число 111221 читается как три единицы, две двойки, одна единица, что дает 312211. Сколько раз цифра 2 встречается в 30-м члене этой последовательности?

Answer 1

Ответ: 1423

PascalABC.NET 3.7:

• ###
• var s: string := '1';
• loop RI - 1 do s := s.AdjacentGroup.SelectMany(x → x.Len + x[0]).Str;
• s.Count(x → x = '2').Pr