Var n, s : integer;
begin
s := 0;
while 2 * 2 <> 5 do begin
readln(n);
if n < 0 then break;
if n > 100 then s := s + 1;
end;
writeln(s);
end.
1
375 байт = 375*8 бит = 3000 бит всего, значит на каждый символ приходится:
3000 / 500 бит = 6 бит
6ю битами мы может закодировать <span> различных символов.</span>
ответ. не более чем 64 2
Число символов в сообщении равно:
Значит на каждый символ приходится:
9000 / 14400 байт = 9000 * 8 / 14400 бит = 5 бит
это информационный вес каждого символа.
с помощью 5 бит можно закодировать <span> различных символов.</span>
<span>ответ. 5 бит, 32 символа так надеюсь</span>
var
P:array[2..100000] of boolean;
i, n, pr:integer;
flag:boolean;
begin
write('max = ');
readln(n);
for i := 2 to n do
P[i] := true;
pr := 2;
flag := true;
while flag do
begin
i := 2 * pr;
while i <= n do
begin
P[i] := false;
i := i + pr;
end;
flag := false;
for i := pr + 1 to n do
if P[i] then
begin
pr := i;
flag := true;
break;
end;
end;
for i := 10 to n do
if P[i] then
writeln(i);
readln;
end.
1. 16 бит симв * 10 * 32 * 48 = 245760 бит / 8 / 1024 = 30 кбайт
2. <span>Тише едешь – дальше будешь. = 27 симв * 2 байт симв = 54 байт
3. 5 кбайт * 1024 * 8 = </span>40960 бит; 8 * 1024 = 8192; 40960 бит / 8192 симв = = 5 бит на символ; 2^5 = 32 символов содержит алфавит.
4. первый (ln(256)/ln(2)) / (ln(64)/ln(2)) = 1,3 раза больше первый второго.
5. iso=1 байт симв; unicode=2 байт симв; 2 кбайт / (2/1) = 1 кбайт вес будет
6. <span>Как мало прожито – как много пережито! = 38 симв; 38 * 1 байт = 38 байт
7. будет тот же самый "computer". Значит и последовательность десятичных цифр та же самая копия.
8. Будет l i n k
</span>