110010012 в двоичной системе счисления и хотите перевести его в десятичную. Делаем это вот таким образом : 110010012<span> = 1∙2^7</span>+1∙2^6+0∙2^5+0∙2^4+1∙2^3+0∙2^2+0∙2^1+1∙2^0<span> = 128+64+0+0+8+0+0+1 = 201</span>
===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
var a := ArrRandom(n, -99, 99);
a.Println;
Println('Результат:', (a.Max + a.Min) / 2)
end.
===== Turbo Pascal =====
program abcd;
uses Crt;
const
nn = 100;
var
i, n, max, min: integer;
a: array[1..nn] of integer;
begin
ClrScr;
Write('n = ');
Readln(n);
Randomize;
max := -32768;
min := 32767;
for i := 1 to n do
begin
a[i] := Random(199) - 99;
Write(a[i], ' ');
if a[i] > max then
max := a[i]
else if a[i] < min then
min := a[i]
end;
Writeln;
Writeln('Результат: ', (max + min) / 2);
ReadKey
end.
64 символа - это 6 бит на хранение каждого, т.к.
2^6 = 64
Всего симовлов 100
информационная ёмкость сообщения 6*100 = 600 бит
Основная формула N=2b
32=2^5. Из этого следует, что вес одного символа равен 5ти битам.
5*128*48*10=307 200 бит.
307 200:8= 38400 байт
38400:1024= 37.5 Кбайт
Напомню, что:
1 байт= 8 бит
1 Кбайт= 1024 Кбайт