Var n,k : Integer;
Begin
k:=0;
Readln(n);
While n>0 do
Begin
n:=n div 10;
Inc(k);
end;
Writeln('Цфир: ',k);
end.
1 символ = 1 байт = 8 бит
100*40*60 = 240000 байт = 1920000 бит
Дано:
N=4
K=10
Найти:
I=?
Решение:
I=K*i
2^i=N
i=√N
i=√4
i=2 бит
I=10*2
I=20 бит
Ответ: 20 бит
Ответ:
Зайди в статус, нажми на 3 точки и "Приватность статуса", а там на "Мои контакты"