Для передачи сообщения используется набор,состоящий только из десятичных цифр(0,1,2,3,4,5,6,7,8,9). Определите минимально возмож
оксана одинцова [7]
Цифр 10 значит минимум нужно 2^4=16 комбинаций из 4 бит.
Ответ - 4 бит
3!=3*2*1=6
три умножить на 2 умножить на 1=6
ответ в
ответ в
Var
a,i,n:integer;
begin
readln(a);
while a>0 do
begin
inc(i);
a:=a div 10;
end;
writeln(i);
<span>end.</span>
<h3>PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ReadSeqInteger(20).Where(t -> Abs(t) < 10)
.Aggregate(BigInteger(1), (p, q)-> p * q).Println
end.
<h2>Пример</h2><h3>9 9 9 9 9 9 9 9 9 9 9 9 9 -9 -9 -9 -9 9 9 9</h3><h3>12157665459056928801 </h3>