Из условия следует, что на одной странице
символа, а раз так, в тексте
символа. Следовательно, текст будет весить
бит, или 56320 байт, или 55 КиБ:)
Ответ:
㏒₂12 ≈ 3.58
Объяснение:
Если считать, что все карандаши разных цветов, шанс достать синий карандаш (как и любой другой определенного цвета) равен один из двенадцати. Вес информационного сообщения равен ㏒₂(12/1) ≈ 3.58
Пишу на Delphi (ObjectPascal):
function Summa(a,b:integer):string;
var a1,b1:integer;
begin //находим сумму первого числа
a1:=(a div 1000)+((a div 100)mod 10)+((a mod 100)div 10)+(a mod 10);
<span>
//находим сумму второго числа</span>
b1:=(b div 1000)+((b div 100)mod 10)+((b mod 100)div 10)+(b mod 10);
<span>
//выясняем что больше</span>
if a1>b1 then
Result:='Сумма цифр левого числа больше. Оно равно: '+IntToStr(a1)
else
Result:='Сумма цифр правого числа больше. Оно равно: '+IntToStr(b1);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin //Выполнение и вывод результата функции через нажатие кнопки
Label1.Caption:=Summa(StrToInt(Edit1.Text),StrToInt(Edit2.Text));
end;
<span>//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)</span>
begin
Println('Нужно привезти: ',ReadArrInteger(ReadInteger('n->')).Sum,'д. ед.');
end.
Пример:
n-> 5
10 20 30 40 50
Нужно привезти: 150 д. ед.
Вообщем тему эту давно делал, но попробовать стоит...
дано:
50 стр; 40 строк; 60 симв; N=256
реш:
60*40*50=120000 симв в (книге вообще)
256=2^8 значит 1символ=8бита
120000*8=960000бит
можно в более весомую единицу перевести:
960000\8=120000 байт
120000\1024=17.1875кб
дальше думаю не стоит