tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Посчитать сумму цифр в
Посчитать сумму цифр в двоичном представлении числа паскаль.! пример дано 10 вывести должно 2
debiltrue
2 11.09.2019 06:50
0
Ответы
staritsckymax
07.10.2020 06:58
Var a,k:integer;
begin
readln(a);
k:=0;
while a>0 do
begin
if a mod 2 = 1 then k:=k+1;
a:=a div 2;
end;
writeln('k = ',k);
end.
Пример:
10
k = 2
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
121e312r3214
15.06.2019 18:30
Всхожесть семян пшеницы равна 95%. сколько тонн семян нужно посеять, чтобы 35 тонн из них проросло?...
варай
15.06.2019 18:30
Как решать по информатике 7 класс вождь племени мульти поручил своему министерству разобрать довоичный код и пересевти в него всю важную информацию.двоичный код какой разрядности...
Klot0708
15.06.2019 18:30
Составте программу которая заполняет массив а 1.10 случайными целыми числами в диапазоне от 0 до 2 и выводит на экран количество элементов равных 1...
Lol22137853992
25.04.2019 20:05
Умоляю хелп человек использует разветвляющие алгоритмы в примеры !...
Anna2271
22.03.2021 21:02
Информацию о дисках можно получить в программе...
ruslankuksa07
22.03.2021 21:03
Восстановить удаленный файл в windows можно из окна...
mksmsslvp0b481
22.03.2021 21:05
МЕНЯ ОТПРАВИЛИ В ШКОЛУ ПИК НАДЕЖДЫ.ЧЁ ДЕЛАТЬ...
Дания29
29.04.2020 14:08
1Верно ли утверждение, что в модели IP поверх DWDM отсутствует канальный уровень? 2. Услуга виртуальных частных сетей может предоставляться: а) на уровне IP; б) на канальном уровне;...
данданн
29.04.2020 14:08
Проверить для четырехзначного числа признак делимости на 3.В случае делимости вывести на экран «делится», в случае не делимости – « не делится»....
dasha18s10
29.04.2020 14:05
Контрольная работа по теме «Табличный процессор MS Excel» (Вариант 1) Часть I. Задания основного и среднего уровней (каждое задание по 0, ) В заданиях 1 – 12 выберите один или несколько...
Популярные вопросы
Найти количество вещества хлорида натрия naci массой 58...
1
Сообщение об особенностях дисциплины в профессии учитель...
1
Когда выпал снег не растаял месяц какой( и когда установился постоянный снеговой...
2
Мои размышления о школьных годах будущим ученик 22в...
1
Поставьте предложения в present perfect simple. первые 3 в отрицательное , а вторые...
1
3простых предложение из произведения бедная лиза...
3
Abcd равнобедренная трапеция ab ii dc ab = 20 cm bc = 10 cm cd = 8 cm найти длину...
2
Над озером висели тяжёлые тучи да всё время сыпал мутный дождик. надо поставить...
2
Вчём заключается особенности политического устройства государства давань?...
3
Разберите 1 2 предложения по частям речи и членам предложения за школой...
3
begin
readln(a);
k:=0;
while a>0 do
begin
if a mod 2 = 1 then k:=k+1;
a:=a div 2;
end;
writeln('k = ',k);
end.
Пример:
10
k = 2