Смотрим по таблице К для b=24. Поэтому К=16777216. Ответ:16777216 цветов
Program z;
var a: array [1..10] of integer;
k,i: integer;
begin
k:=0;
for i:=1 to 10 do
readln(a[i]);
for i:=1 to 10 do if a[i] mod 10 = 2 then k:=k+1;
writeln(k);
end.
В двоичном алфавите используется только 0 и 1, следовательно мошность алфавита - 2.
Var n,s,i: integer;
begin
write('Количество слоев: ');
readln(n);
for i := 1 to n do
s:=s+i*i;
writeln('Число шаров: ',s)
<span>end.</span>