Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
katrin7878
03.04.2020 05:06 •
Информатика
Написать программу нахождения суммы цифр 3-х значного числа pascal abc
Показать ответ
Ответ:
astashkin222
10.08.2020 19:17
Var a,b,c,d:integer;
begin
readln(a);
b:=a mod 10;
c:=b mod 10;
d:= c mod 10;
writeln(b+c+d);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
topwkolnik
12.02.2021 10:24
решить первое и второе задание...
сымбатым
23.12.2021 16:41
Задание 1: Перечислите виды сигналов (5 основных) Задание 2: Информацию, которую можно получить с измерительных приборов, называют: Задание 3: Информацию, выраженную...
Мальвина1122
02.04.2022 22:57
Стиральная машина подорожала на 16% и стала стоить 24360 рублей.потом она подешевела на 15%.на сколько рублей дороже стоила эта стиральная машина до подорожания ,чем...
dima03102003
21.11.2022 10:04
Надо верная строка else begin x: =0; y: =y+1 end 2- then y: =y+1; x: =0 else y: =0; x: =x+1 3-какова структура оператора организующего ветвление в языке програмирования...
mandarin50
14.04.2022 20:02
Вычисли 244см: 4; 135кг×5; 2м48см: 4; 568дм: 4; 800кг: 5; 126ц: 2; 721м: 7; 918см: 2; 53см4мм: 3...
Помрлтм245
04.08.2022 22:42
Некоторое количество азота находится в сосуде с поршнем. при давлении 150кпа газ в сосуде расширился от объема 10л до объема 12л. определите изменение внутренней энергии...
Конник953
02.03.2020 15:26
Разность корней квадратного x^2 +2x+q=0 найдите корни уравнения и значение q...
MoonVar
06.08.2020 20:57
Очем был фильм один дома и какое ваше мнение? кратко и на ....
прорппп
25.04.2023 08:37
Висоти ак і вd гострокутнього трикутника авс перетинаються в точці н. відомо, що кут вас дорівнює 45 градусів. доведіть, що ан дорівнює вс...
syltanchik1338
13.01.2020 08:39
Тело бросили вертикально вверх с начальной скоростью 40 метров в секунду. нужно найти пройденный путь за время 5 секунд движения....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a);
b:=a mod 10;
c:=b mod 10;
d:= c mod 10;
writeln(b+c+d);
end.