Var
a:integer;
begin
read(a);
writeln(a div 10,' ',a mod 10);
end<span>.</span>
<u>В КУМИР</u>
алг
нач
цел n,k
ввод n
n:=iabs(n) | если введут отрицательное
k:=0
нц пока n<>0
если mod(n,2)=1
то
k:=k+1
все
n:=div(n,2)
кц
вывод "единичных бит ",k
кон
Решение не возможно. Должно быть условие сколько бит до перекодирования в кодировке было. Проверь условие
8 цветов...так как 2 в третей степени равно 8...это по формуле хартли N=2^i, где i это наши 3 бита
Скорее всего тут 8 битная кодировка ,поэтому 2162 байта весит фаил