Объяснение:
89/2=44 (остаток 1)
44/2=22 (0)
22/2=11 (0)
11/2=5 (1)
5/2=2 (1)
2/2=1(0)
1/2=0 (1)
89₁₀=1011001₂
73/2=36 (1)
36/2=18 (0)
18/2=9 (0)
9/2=4 (1)
4/2=2 (0)
2/2=1 (0)
1/2=0 (1)
73₁₀=1001001₂
1 0 1 1 0 0 1
+ 1 0 0 1 0 0 1
1 0 1 0 0 0 1 0
1 0 1 1 0 0 1
- 1 0 0 1 0 0 1
1 0 0 0 0
1 0 1 1 0 0 1
× 1 0 0 1 0 0 1
1 0 1 1 0 0 1
+ 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0
+ 1 0 1 1 0 0 1
+ 0 0 0 0 0 0 0
+ 0 0 0 0 0 0 0
+ 1 0 1 1 0 0 1
1 1 0 0 1 0 1 1 0 0 0 0 1
3268₁₀=110011000100₂ (как переводить числа в двоичную систему я расписал выше).
43₁₀=101011₂
110011000100 |_101011_
- 101011 | 1001100
1000000
- 10 10 1 1
1 0 1 0 1 1
- 1 0 1 0 1 1
0
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadSeqIntegerWhile(n->n mod 5<>0).Where(n->n>10).ToArray;
Writeln('n= ',a.Count,', S=',a.Sum)
end.
Пример
37 -18 42 57 24 9 17 20
n= 5, S=177