Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
daliiss
31.10.2020 22:08 •
Информатика
Найти все делители числа n, кратные 5
Показать ответ
Ответ:
анастасиятихая
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 оценок)
Популярные вопросы: Информатика
GagarinPSK
25.03.2020 09:23
(x=4 y=14.0)(x=-5 y=-1.0) сделайте программу на пайтоне)...
timadva
23.01.2023 10:23
Дана блок-схема. Если =36;=7....
vera186
23.12.2021 16:39
я на уроке, информатике ...
Noa18
01.05.2023 10:03
Створити проект по інформатиці, в лазарус. Більше з чисел зменшити на 5, а менше збільшити в 3 раза...
windi37
16.06.2021 23:19
Программирование арифметических операций на языке Ассемблер Составить программу на языке ассемблер для микропроцессора Intel 8080, вычисляющую значение функции Y. Соблюдение...
pdgudkova
02.10.2020 07:49
Почему при совершении денежных операций через интернет не используется протокол нттр?...
l3bv1t
20.08.2020 14:46
VE 1+ sin vx+1 cos(13x-4)как написать на с++...
Olga5513
05.12.2020 05:24
Преобразуйте данную формулу равносильным образом так, чтобы она содержала только операции отрицания и дизъюнкции: (отрицание Х - Y)- Z = ? отрицание Х - это Х с черточкой...
KILLER435
23.02.2022 17:04
решить с Даны целочисленные координаты точки на плоскости. Если точка совпадает с началом координат, то вывести 0. Если точка не совпадает с началом координат, но лежит...
Аня20041334
17.06.2022 00:26
4. Задача: как оплатить S тенге с минимальным количеством монет 1,5,10,50 и 100 тенге? Составьте, используя блок-схему программы. S(0 S 100000) является целым числом....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.