Всё просто. До из суммы вычитается загаданное число. Возьмите число 0 и сами всё поймёте
1/16 Мб = 65536 байт; в 16-ти симв. алфавите на кодировку 1-го символа нужно 4 бита , значит в 1 байте 2 симв. если объем 65536 байт, умножь на 2
получишь 131072 символа <span>
131072 символа </span>
<span>(1/16)*(1024*1024)*(8_бит) / (4 бита для 16 символьного алфавита) </span>
<em>// PascalABC.NET 3.2, сборка 1407 от 18.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var s:=Range(1,10);
Writeln(s.Aggregate(1,(p,q)->p*q));
Writeln('S=',s.Where(k->k.IsEven).Sum,', П=',
s.Where(k->k.IsOdd).Aggregate(1,(p,q)->p*q));
Writeln('S2=',s.Select(k->k*k).Sum)
end.
<u>Результат</u>
3628800
S=30, П=945
S2=385
1) 192 Кбит/с= 192/8 Кбайт/с = 24 Кбайт/с;
2) 3600 Кбайт/с / 24 Кбайт/с = 150 секунд;
3)150 секунд= 150/60 минут = 2,5 минут.
<span>Ответ: 2,5 минут.</span>