Изи $^/^:"$&;/#5/^$$&&:"$//&^;:":^^:///$$$34;&
[email protected]^#36^'$57:$66"$88^'67*:/
1)механические весы
2)компьютеры на транзисторах компьютер 6600 фирмы CDC
1) Всього в бібліотеці є 16*8=128 полиць.
2^k=128 => k=7
Отже, щоб закодувати числа від одного до 128, потрібно 7 біт.
Відповідь: повідомлення містить 7 біт
2) ПОВІДОМЛЕННЯ
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
function nDigits(n:int64):integer; // если число
begin
Result:=0;
if n<0 then n:=-n;
while n>0 do begin
Result+=1;
n:=n div 10
end
end;
function nDigits(s:string):=s.Length; // если строка
begin
Writeln(nDigits(1234567890123456)); // 16
Writeln(nDigits('123456789012345678901234567890')) // 30
end.
<u>Результат</u>
16
30
Var a, b, c, v, s:integer;
begin
read(a, b, c);
writeln('V = ', a*b*c);
writeln('S = ', 2*(a*b+b*c+a*c));
end.