Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
aannnnn
01.10.2020 07:56 •
Информатика
Найти все делители числа n, кратные 5
Показать ответ
Ответ:
karinarei2017
02.10.2020 13:38
Var i, n: integer;
begin
write('N = ');
readln(n);
for i:=1 to n do
if (n mod i = 0) and (i mod 5 = 0) then write(i, ' ');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
майя155
15.06.2020 19:22
При наборе текста одно слово от другого отделяется : а) точкой б) пробелом в) запятой г) двоеточием ...
BARBARIC5665
02.10.2021 06:16
Как это убрать данное окно?...
funtic20
13.09.2022 13:55
Организуйте цикл for, счетчик которого изменяется от 100 до 200 с шагом 3....
romanovanelya
09.12.2021 16:41
Ниже записан алгоритм. Укажите наименьшее из таких чисел X, при вводе которых алгоритм печатает сначала 3, а потом 2. Pascal: var x, a, b, c: integer; begin readln(x); a:=...
Ооооооокккккккк
15.04.2023 04:03
Свободный объём оперативной памяти компьютера 640 кб . сколько страниц книги поместиться в ней, если на странице 16 строки по 64 символа в строке ( кодировка символов осуществляется...
danmin444
22.08.2022 13:49
Заполнить таблицу трассировки для следующего кода. a 5 b 4 a5 b5 a-5 b5...
abeke4
12.07.2020 21:48
Теория вероятости, 7 класс решить 1 и 2 номер...
Машkа
28.05.2022 09:12
ЭССЕ Цивилизация – это власть над миром, культура – любовь к миру in...
grachikovaleksei
28.05.2022 09:12
В ля мажоре запишите Т53 с обращением. S53 с обращением.D53 с обращением + тритоны + D7 с обращением и решением...
Ryuuko
28.05.2022 09:12
надо найти 13 названий морских обитателей...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('N = ');
readln(n);
for i:=1 to n do
if (n mod i = 0) and (i mod 5 = 0) then write(i, ' ');
end.