Сколько единиц в двоичной записи числа 41024 + 22046 - 15?

Question

Информатика

Ахикар

11 декабря, 10:25

Сколько единиц в двоичной записи числа 41024 + 22046 - 15?

+1

Ответы (1)

Знаете ответ на вопрос?

Алляметдин · Answer 1

Begin

var L : = new List;

var num : = 41024 + 22046 - 15;

var i : = 65536;

while i > = 1 do begin

if (num and i) 0 then L. Add (1)

else if (num and i) = 0 then L. Add (0) ;

i : = Trunc (i / 2) ;

end;

L. Println; / / 0 1 1 1 1 0 1 1 0 0 1 0 0 1 1 1 1

L. Where (t - > t = 1). Count. Println; / / 11

end.