begin
var a := ArrRandom(10, 1, 10); a.Println;
for var i := 0 to a.High do
if i.isOdd then a[i] *= 2
else a[i] *= 3;
a.Println;
end.
F.C.B 0000000000000000000000000000000000000
Исходя из законов логики мы имеем дело с операцией с константой. Значит
1. A & 1= A
2. ¬A & 1 = ¬A
3. 0 & 1 = 0
4. 1 & 1 = 1
<span>Степь, или безлесая равнина, простиралась до самого горизонта </span>
<span>Бегемот, или гиппопотам, любит сидеть подолгу в воде. </span>
<span>Часто встречаются леса чёрного тополя, или осокоря, как говорят местные жители.</span>