Я розгадав ребус це буде Ація
=450/150 = 3 бита
аналогично: всего сварили 450 литров компота, которые разлили в 150 банок. каков объем банки?
Есть много разных способов решения этой задачи. Например:
var n:integer; b:boolean; m:set of 0..9;
begin
write('n='); readln(n);
m:=[];
b:=false;
while (n>0) and not b do
if n mod 10 in m then b:=true else begin m:=m+[n mod 10]; n:=n div 10; end;
if b then writeln('В записи введенного числа есть одинаковые цифры')
else writeln('В записи введенного числа нет одинаковых цифр');
end.
Пример:
n=123432
В записи введенного числа есть одинаковые цифры
4 мбайта = 4 * 1024 *1024 = 4194304 байт * 8 = 33554432 бит
65536 = 2 ^ 16 - для одной точки используется 16 бит
Из объема удалить информацию о цвете и тогда получим количество точек
33554432 бит / 16 = 2097152 точек
1) 2^85=100...0 (2cc) (1 и 85 нулей)
8^25=(2^3)^25=2^75 =100..0 (2cc) (1 и 75 нулей)
4^6=2^12=100...0 (2cc) (1 и 12 нулей)
8=2^3=1000 (2cc) (1 и 3 нуля)
2) 2^12 +2^3= 1000000000000+1000=1 0000 0000 1000 (2cc) (две единицы)
3) 2^85-2^75= 11 1111 11110000...0 (десять единиц и 75 нулей)
4) 10 единиц+2 единицы=12 единиц
ответ 12