Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
aleXxxx03
14.01.2023 04:38 •
Информатика
Дано трехзначное число. найдите сумму его цифр. входные данные вводится целое положительное число. гарантируется, что оно соответствует условию . выходные данные выведите ответ на . (примеры: входные данные-179,выходные данные-17) решить в паскале
Ответ:
Kate2017Wes
03.10.2020 00:02
Var a,s:integer;
begin;
readln(a);
while a<>0 do
begin;
s:=s+(a mod 10);
a:=a div 10;
end;
write(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
leraanufrieva
07.08.2020 12:51
Е векторных сений. Урок 2Установи соответствие между комбинациями «горячих» клавиши их назначением.обзор урокаданиесторных изобра...нспектадание 2адане -Задание 51Вадан...
sivtsevavera2005
11.09.2022 09:01
Какое вычисление в двоичной системе выполнено неверно? а) 101-11=11б) 111010+10=111100в) 11100+11=100111г) 11×11=1001д) 1001-11=100е) 11111×1010=100110110ж) 110011,001-1,011=111110,1з)...
shuius
30.05.2021 00:32
3класс. как научить вашего ребенка писать изложения : замени повторяющиеся и однокоренные слова синонимами мы съезжаем с горы на санках. потом санки надо тащить в гору....
12sa1900
30.05.2021 00:32
Что такое словарь образования слов языка?...
Рано007
30.05.2021 00:32
Скільки існує трицифрових чисел, сума цифр кожного з яких дорівнює 26...
GoldenRose99
30.05.2021 00:32
Pпростое число. сколько делителей имеет p в 3,5,9 степени...
Sergey15211
30.05.2021 00:32
Что, в случает со мной, было трудно. верно ли расставлены знаки препинания?...
80zumani
30.05.2021 00:32
Выпиши имена существительные и разбери их как часть речи. пес дружок охранял в палатке съестные припасы и охотился за дичью...
elvinaaminova2004
30.05.2021 00:32
Как решить пример 36*35-35*34+34*33-33*32+32*31-31*30+30*29-29*28+28*27-27*26+26*25-25*24=...
kjhf2225
30.05.2021 00:32
Какова роль животных в природе и жизни человека...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin;
readln(a);
while a<>0 do
begin;
s:=s+(a mod 10);
a:=a div 10;
end;
write(s);
end.