Ну я думаю 32 * на столько сколько он сам стоит например 420
Var out, i:integer;beginfor i:=50 to 100 do if i mod 10 = 3 then inc(out);write(out);end.
75-12=63 варианта
Все, что нам остается сделать, это найти ближайшую степень двойки, превышающую число вариантов, то есть 64, тогда, количество информации в сообщении "Даниил загадал 70" по формуле Хартли:
I=log₂64=6 (бит)