1-А
2-Б
3-В
4-А
5-Б
6-А
7-А
8-Б
9-В
10-Б
11-Б
12-Б
13-В
14-Б
15-А
Var
n:integer;
begin
readln(n);
if n > 10 then writeln(n, ' > ', 10);
if n < 10 then writeln(n, ' < ', 10);
if n = 10 then writeln(n, ' = ', 10);
<span>end.</span>
Могу ошибаиться с пониманием задачи, мой ответ: 78 или 12+11+10+9+8+7+6+5+4+3+2+1
11100
решение просто на глаз:
1 это - 1
10 это 2
100 это 4
1000 это 8
10000 это 16
так как 4+8+16 = 28
то мы и берем только
100 + 1000 + 10000 = 11100
по другому делаеться так:
28 делим на 2, получаем 14, остаток от деления 0
14 делим на 2, получаем 7, остаток 0
7 делим на 2, берем целую часть 3, остаток 1 (т.е вот так: 3*2+1=7)
3 делим на 2, берем целую часть 1, остаток 1 (т.е вот так: 1*2+1=3)
1 делим на 1, целая часть 0 остаток 1
Теперь берем остатки, и записываем адом наперед 11100
21:
224 бита×5 символов=1120 битов=140 байт
22:
2 байта×176 бит=352 байта=2816 бит