Для записи одного из 13 значений требуется log(2)13 ≈ 4 разряда, для записи одного из 99 значений - log(2)99 ≈ 7 разрядов, т.е. в 7/4 - 1,75 раз больше.
Var q,i,s:integer;
begin
readln(q);
s:=0;
i:=0;
while s<q do
begin
i:=i+1;
s:=s+i;
end;
if s=q then writeln('Страница = ',i+1)
else writeln('Ошибка ввода');
end.
Пример:
5
<span>Страница = 6</span>
За 1 час стрелка поворачивается на 360/12 = 30 градусов.
Если она повернулась на бета градусов, то прошло бета/30 часов.
Показание часовой стрелки понятно, показание минутной рассчитывается.
Каждый час = 60 минут минутная стрелка поворачивается на 360 градусов,
То есть время равно int(beta/30) часов и (beta mod 30)*60 минут.
Здесь int - это "целая часть числа", mod - "остаток от деления".
625Кбайт = 625*1024*8 = 5120000бит
5120000/128000=40 сек
Всего возможных вариантов N=16.
Подставим это в формулу
Таким образом, 4 бит информации несет сообщение