Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
текст но точно не знаююююю
пусть введенный интервал будет
b и c,где b< c
var a,b,c,i: longint;
begin
read(b,c);
for i: =b to c do
if i mod a=0 then write(i);
end.
64 * 64 = 4096
512 * 8 = 4096 бит
4096 : 4096 = 1 бит
n = 2^i
n = 2^1 = 2 цвета
ответ. 2 цвета.
Популярные вопросы