tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
А. составьте подпрограмму-функцию,
А. составьте подпрограмму-функцию, которая по заданному натуральному числу n вычислит сумму его цифр. б. составьте алгоритм, подсчитывающий количество n-значных натуральных чисел, у каждого из которых сумма цифр равна заданному натуральному числу k.
mery77
3 15.06.2019 16:10
0
Ответы
adelyavalieva1
12.07.2020 18:54
A.
Program enot;
Var a,c,sum: integer;
begin
read(a);
while a>0 do
begin
c:= a mod 10;
sum:=sum+c;
a:=a div 10;
end;
writeln(sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ИзабельКоролина2006
17.06.2021 07:59
Как заработать ранг в аниксарте? ...
konovalov201
17.06.2021 07:45
На рисунке справа схема дорог н-ского района изображена в виде графа в таблице содержатся сведения...
mishtal2017
17.06.2021 07:42
Задан фрагмент алгоритма если a 0 то a= – a если b 0 то b= – b если a иначе b=b + a В результате выполнения данного алгоритма с начальными значениями a=8; b=-2 какое...
kapital0202p0cd2e
17.06.2021 07:30
В ячейку С8 введите: - сообщение «Оба числа отрицательны», если в ячейках С6 и С7 находятся отрицательные числа; - сообщение «Оба числа положительные», если в ячейках...
nastik1102
17.06.2021 07:28
В ячейку В3 занести: - корень квадратный из произведения В1 и В2, если числа в В1 и в В2 отрицательные; - произведение В1 и В2, если число в В1 или число в В2 – положительное;...
Panther111
17.06.2021 07:24
Видеопамять, к какому виду памяти относится видеопамять?...
Назар19
17.06.2021 06:33
Внешняя память компьютера?...
handball230912
17.06.2021 06:31
Специальная память, что к ней относится ; BIOS, CMOS RAM?...
sultanguloverik2
17.06.2021 05:42
Python! Первая картинка предыдущее задание....
maxim090
21.07.2019 17:10
Допустим что тело цикла должно содержать два оператора. какие из операторов правильные, какие нет и почему? a) for i: =12 to 15 do s: =s+i; б) for a: =30 to 20 do if...
Популярные вопросы
Коля задумывает натуральное число из отрезка от 1 до N. Петя должен...
3
Составьте алгоритмы рисования изображённых ниже фигур так, чтобы...
2
Что будет нарисовано после выполнения Чертёжником алгоритма: использовать...
3
Составьте для Чертёжника алгоритм рисования прямоугольника со сторонами,...
2
Василиса Прекрасная должна приготовить эликсир бессмертия. Его нужно...
2
Исполнитель Вычислитель умеет выполнять только две команды. Умножить...
1
Руслан учит наизусть четверостишие, заданное по литературе. Он один...
2
Кот Матроскин и пёс Шарик нашли клад, который состоял из 5 одинаковых...
2
Однажды бабушка попросила Машу собрать ягоды крыжовника. Девочка...
2
Имеется 9 монет, среди которых одна фальшивая (легче других). Придумайте...
3
Program enot;
Var a,c,sum: integer;
begin
read(a);
while a>0 do
begin
c:= a mod 10;
sum:=sum+c;
a:=a div 10;
end;
writeln(sum);
end.