===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
var a :=ReadArrInteger(n); // бессмысленное занятие
a := ArrRandom(n, 1, 50);
a.Println
end.
<span> Команды которые выполняются строго по порядку, от первего до последнего называется линейным оператором</span>
1027 = 1024 + 3 = 2¹⁰ + 2¹ + 2⁰
Каждое слагаемое - целочисленная степень двойки, поэтому оно даст в двоичном представлении одну единицу. Поскольку слагаемых три, то и единиц в записи числа будет три.
<u><em>Ответ: 3</em></u>