Сколько единиц в двоичной записи десятичного числа 1025?
Решение. Переведем число в двоичную систему счисления:
102510 = 1024 + 1 = 210 + 1 = 100000000012.
В двоичной записи 2 единицы.
Приведём решение Сергея Донец на PascalABC.NET:
uses School;
begin
1025.Digits(2).Sum.Print;
end.