Дано число n.найти количество чисел в интервале от 1 до n , делящихся на сумму своих чисел . язык паскаль .
241
481
Ответы на вопрос:
// pascalabc.net 3.3, сборка 1634 от 14.02.2018 // внимание! если программа не работает, обновите версию! begin var n: =readinteger('n='); var p: =0; for var i: =1 to n do begin var (k,s): =(i,0); while k> 0 do begin s+=k mod 10; k: =k div 10 end; if i mod s=0 then p+=1 end; writeln(p) end.
Program for_znaniya; var n, i, c, t, sum: integer; begin readln(n); c : = 0; for i: = 1 to n do begin sum : = 0; t : = i; repeat sum : = sum + t mod 10; t : = t div 10; until t = 0; if (i mod sum) = 0 then inc(c) end; writeln(c) end.
подсистема - набор объектов и подсистем, обеспечивающих некоторую функциональность, и взаимодействующих между собой в соответствии с их интерфейсами.
иерархическая система -это модель данных, где используется представление базы данных в виде древовидной (иерархической) структуры, состоящей из объектов (данных) различных уровней. Между объектами существуют связи, каждый объект может включать в себя несколько объектов более низкого уровня.
типы :
иерархически последовательный;
иерархически индексно-последовательный;
иерархически прямой;
иерархически индексно-прямой;
индексный.
(типы не уверена ,что правильно)
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
АННА333333333333322.01.2021 00:15
-
виктория334509.07.2021 19:17
-
BRB98706.05.2023 09:12
-
66560925.07.2021 20:37
-
sayanasssss20.03.2021 13:08
-
Ертилеу13.03.2021 14:56
-
kuznetsovakristina06.12.2022 21:41
-
sashok003121.03.2021 09:18
-
Eldarval17.05.2022 17:03
-
kravchenjatkop00zs029.11.2022 15:36
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.