Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
art171
16.01.2021 23:37 •
Информатика
Пользователь вводит трехзначное число, надо вычислить сумму чисел этого числа.
Показать ответ
Ответ:
pdv20
03.10.2020 02:07
Var x,a,b,c:integer;
begin
write('Введите число: ');read(x);
a:=x div 100;
b:=x div 10 mod 10;
c:=x mod 10;
writeln('сумма цифр: ',a+b+c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
антон778
15.07.2022 07:51
РЕБЯТ ПО ИНФОРМАТИКЕ ОЧЕНЬ Номер 3. Напишите программу по блок-схеме. Очень...
krasio
24.09.2022 23:03
Задание на 1 и 2 скрине. Блок схемы. К задачам на 3 и 4 скрине...
Kinder281
24.10.2021 06:10
Петя записал ip-адрес школьного сервера на листке бумаги и положил его в карман куртки. петина мама случайно постирала куртку вместе с запиской. после стирки петя обнаружил в кармане...
Андрей1935362825
07.09.2020 00:00
Нужно составить программу которая находит площадь и периметр поямоугольника 2)составте программу для вычисления косинусов углов треугольника со старонами а,в,с...
мика559
07.09.2020 00:00
Доступ к файлу ege.ppt , находящемуся на сервере ftpp.ru , осуществляется по протоколу ftp. ниже фрагменты адреса файла закодированы буквами от а до ж. запишите последовательность...
GlebRyabov
07.09.2020 00:00
Какое количество информации несет в себе сообщение о том, что нужная вам программа находится на одной из 16 дисков?...
Vladisimus
26.11.2020 14:34
Напишите программу которая вычисляет среднее значение 4х динамических переменных,переменные являются целыми...
lizalist0506
26.11.2020 14:34
Слогической переменной определить: является ли шестизначное натуральное число палиндромом. на с++....
sadlyuda
29.10.2021 15:03
Как составить блок-схему и программу, проверяющую, верно ли утверждение, что введенное вами целое число является четным....
liliakolokol
05.11.2021 08:29
Эссе в 10 предложении робот в повседнневной жизни...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('Введите число: ');read(x);
a:=x div 100;
b:=x div 10 mod 10;
c:=x mod 10;
writeln('сумма цифр: ',a+b+c);
end.