10101010 - 1 байт (8бит)
Информационная емкость знака генетического кода равна 1,88х1021 бит на см3
N = 8
k = 4
Н-ти:
I = ?
Р-ние:
i = log₂N ; I = i*k
i = log<span>₂8 = 3 бита
I = 3*4 = 12 бит.
Ответ: 12 бит.
</span>
//Моя интуиция подсказывает мне, что это должно выглядеть так
var a,b:integer;
begin;
randomize;
a:=random(10);
readln(b);
if a=b then writeln('Угадала') else writeln('Не угадала, было загадано:',a);
<span>end.</span>
Var x,sum:integer;
begin
readln(x);
sum:=1;
while x>0 do begin
sum+=x mod 10;
x:=x div 10;
end;
writeln(sum mod 2);
end.