В колоде 4 туза, следовательно шанс вытащить туза 4/32=1/8.
Неопределенность уменьшилась в восемь раз, 8=2 в третьей степени.
Поэтому информации 3 бита.
19 ходов. 7 дом, 3 дерево, 4 солнце, 3 фиксации, 2 вызова.
//PascalABC.NET 3.1 сборка 1200
begin
var d := ReadReal('d =');
var s := SeqGen(
ReadInteger('n ='),
ReadReal('a1 ='),
a -> a + d)
.Aggregate((s, x)-> s + x);
writeln(s);
end.
<h3>PascalABC.NET 3.4.2, сборка 1826 от 07.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadlnString.ToWords.First.Println
end.
Пусть основание равно n и все числа записаны в системе счисления по этому основанию.
Тогда 99 = 9n+9 = 9(n+1)₁₀
1210 = 1n³+2n²+1n¹+0n⁰ = n(n²+2n+1) = n(n+1)²₁₀
Получаем уравнение в десятичной системе счисления
9(n+1)×9(n+1) = n(n+1)²
81(n+1)² = n(n+1)² ⇒ n=81
Ответ: в системе с основанием 81