)Пусть в коробке было х белых карандашей.Вероятность того, что достали белый карандаш, равна – х/64.Количество информации сообщения о том, что достали белый карандаш, равно I= - log2 (х/64) бит, что по условию задачи составляет 4 бита, т.е. имеет место уравнение: Значит, в коробке было 4 белых карандаша.<span> </span>
Если у Марии было 3 собаки, то сколько их стало, когда Мария отдала 1 собаку Маше?
Uses crt;
var
n,a,b,c,m:integer;
begin
clrscr;
write('Vvesti 3-x znachnoe chislo ');
readln(n);
c:=n mod 10;
a:=n div 100;
n:=n div 10;
b:=n mod 10;
writeln('cifri chisla ',a:3,b:3,c:3);
write('vvesti cifru ');
readln(m);
if (m=a) or (m=b) or (m=c) then writeln('YES') else writeln('NO');
writeln('end programm ');
readkey;
end.
Program pr1;
uses crt;
var
a,r:real;
begin
clrscr;
write('Vvesti storonu kvadrata A ');
readln(a);
write('Vvesti radius kruga R ');
readln(r);
if 2*r =a then writeln('krug vpisan v kvadrat') else
if abs(a*sqrt(2) - 2*r)<=0.01 then writeln('kvadrat vpisan v krug')
else writeln(' ne vpisivajutsya');
writeln('end programm ');
readkey;
<span>end.</span>
Графики..................
А) 1 байт = 8 бит
7 бит < 8 бит
7 бит < 1 байт.
б) 1 Кбайт = 1024 байт
1024 байт > 1000 байт
1 Кбайт > 1000 байт.
в) 1 Гбайт = 1024 Мбайт
1025 Мбайт > 1024 Мбайт
1025 Мбайт > 1 Гбайт.