Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Radjabaliev
29.06.2020 18:25 •
Информатика
Нужно написать программу на pascal: дано пятизначное число, найти сумму всех его четных цифр.
Показать ответ
Ответ:
Asimaaa
25.08.2020 19:56
Весь код писать не буду. Напишу ток ф-ю нахождения.
while ( a != 0) begin // Ввел ты свое число, допустим - а.
c = a div 10; // Делим его на 10, т.е берем его последнюю цифру
d = d+c; // в эту переменную накапливаем сумму цифр
end // конец цикла
0,0
(0 оценок)
Популярные вопросы: Информатика
anna666666666666
01.07.2022 10:42
Дано целое число N и набор из N целых чисел.Найти номер первого максимального нечетного числа из данного набора.Если нечетные числа в наборе отсутствует,то вывести...
ndv1525
10.08.2022 04:34
1.Даны три числа. Найти пары кратных. (например, 12, 6, 4 12 кратно 6, 12 кратно 4) 2. Ввести трехзначное число. Определить совпадают ли в нем первая и вторая цифры....
wur1k
27.07.2020 05:38
Выполните вычисления в модифицированном машинном коде, имитируя работу арифметико-логического устройства (АЛУ), для чисел, представленных в форме с плавающей точкой...
vlasenkoa16311
09.01.2020 07:39
Типы массивов - это: Выберите один ответ: 1 - Символы Юникода: char 2 - Пользовательские типы в формате struct S {...} 3 - Одно- и многомерные, например, int[]...
Aliiev19
20.10.2022 10:33
Например если я создаю мир в майнкрафт, то там только один портал в энд или несколько? Я просто давненько не играла, решила зайти проверить как там всё изменилось)))...
Миша1112994
04.02.2023 03:29
Соедините все веб-страницы с гиперссылок в одну главную веб-страницу, с названием glavnaya.html. Установите произвольную картинку фоном данной веб-страницы. Веб-страница...
denisDergunov
15.03.2023 16:06
Склавиатуры вводится число-длина стороны квадрата. вычислите и выведите площадь и периметр квадрата....
Damir123400
14.11.2020 13:35
Скільки кілограмів масла можна виготовити із 261 кг вершків, якщо з 9 кг вершків отримують 2 кг масла?...
Кепики
04.02.2021 03:07
Розкадіть про особливості візантійського стилю в мистецтві...
rkbsiti
04.02.2021 03:07
Сравните числа : а) – 3113 и – 3773; б) -799 и 799; в) 0 и -215 . 2. Вычислите:а) –71 + 59; б) –240 – (–150); в) – 22 · (–55); г) -3636 : (–18).3. Вычислите наиболее...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
while ( a != 0) begin // Ввел ты свое число, допустим - а.
c = a div 10; // Делим его на 10, т.е берем его последнюю цифру
d = d+c; // в эту переменную накапливаем сумму цифр
end // конец цикла