Сколько единиц в двоичной записи десятичного числа 127?
Решение. Переведём 127 в двоичную систему счисления и сосчитаем количество единиц:
12710=11111112
Приведём решение Сергея Донец на PascalABC.NET:
uses School;
begin
127.Digits(2).Sum.Print;
end.