Найдем количество символов в статье:
16 · 40 · 40
Информационный объем статьи составляет 25 Кбайт.
Делим на 2, записываем остатки
307 | 153 ост 1
153 | 76 ост 1
76 | 38 ост 0
38 | 19 ост 0
19 | 9 ост 1
9 | 4 ост 1
4 | 2 ост 0
2 | 1 ост 0
1
Выписываем 1 и все остатки снизу вверх: 100110011.
В двоичном представлении 5 единиц.
Var
a, b, i, k: integer;
begin
readln(a, b);
for i := a to b do
if i mod (7 * 2) = 0 then
begin
k := k + 1;
writeln(i);
end;
writeln('K = ', k);
end.