Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Ученик705
26.01.2022 05:01 •
Информатика
Составить программу вычисления суммы цифр введенного с клавиатуры 3- х значного натурального числа . например для числа 128 сумма цифр 11, а для числа 345 сумма цифр12.
Показать ответ
Ответ:
AngelinaMon1
02.10.2020 02:37
Program gt;
var n,s:integer;
begin
readln(n);
s:=(n div 100)+(n div 10)mod 10+(n mod 10);
writeln(s);
end.
каждая скобка это 1 2 3 цифра соответсвенно
0,0
(0 оценок)
Ответ:
tridem1
02.10.2020 02:37
Var a,N,sum:word;
begin
Read (N);
Sum:=0;
While N<>0 do
begin
a:=N mod 10;
N:=N div 10;
Sum:=sum+a;
end;
Write (sum);
end.
Или по-простому еще так:
Var a,b,c,N:word;
begin
Read (N);
a:=N mod 10;
b:=(N mod 100) div 10;
c:=N div 100;
Write (a+b+c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
11516118
06.05.2023 08:12
Сколько бит памяти занимает чёрно-белое изображение (без градаций серого) шириной 30 точек и высотой 200 точек?...
катя5062
06.05.2023 08:12
Чертёжнику был дан для исполнения следующий алгоритм: повтори 3 paз команда1 сместиться на (1, 3) сместиться на (1, −2) конец сместиться на (3, 9)...
Olga08062003
12.08.2021 23:12
Дана матрица р(8,9), н(9,7) вещественных чисел. инвертировать все четные строки матрицы. для вычислений использовать процедуру....
Пингвинено25
07.09.2020 03:14
Напишите программу, которая находит номер максимального элемента массива....
Arina8411
07.09.2020 03:14
По какому алгоритму вводимые в компьютер десятичные числа можно перевести во внутреннее двоичное представление? как перевести обратно результаты расчета?...
Емиррорроо
07.09.2020 03:14
Определить истинность составного высказывания (2 х 2=4 и 3 х 3=10) или (2 х 2=5 или 3 х 3=9) (2 х 2=4 и 3 х 3=10) и (2 х 2=5 и 3 х 3=9)...
dashanovikova03
07.09.2020 03:14
Что такое счетчик адреса команд и какова его роль в основном алгоритме?...
SaySasha02
31.10.2020 10:30
Алгоритм , в котором в зависимости от выполнения или невыполнения некоторого условия совершается либо одна , либо другая последовательность действий, называется варианты ответа :...
НастюшаПоможет
10.06.2021 07:00
Реакция диметилпропаналя с малоновой кислотой в присутствии аммиака. Образующую аминокислоту нагреть...
baten
12.06.2020 12:20
Определите тип сочинительной связи по качеству объединяемых компонентов: а) форма слова + форма слова; б) простое предложение + простое предложение. Обозначьте средство связи. Образец:...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n,s:integer;
begin
readln(n);
s:=(n div 100)+(n div 10)mod 10+(n mod 10);
writeln(s);
end.
каждая скобка это 1 2 3 цифра соответсвенно
begin
Read (N);
Sum:=0;
While N<>0 do
begin
a:=N mod 10;
N:=N div 10;
Sum:=sum+a;
end;
Write (sum);
end.
Или по-простому еще так:
Var a,b,c,N:word;
begin
Read (N);
a:=N mod 10;
b:=(N mod 100) div 10;
c:=N div 100;
Write (a+b+c);
end.