Войти Регистрация Спроси ai-bota

Найти все делители числа n, кратные 5

Показать ответ

Ответ:

gc121

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 оценок)

Популярные вопросы: Информатика

zulyarakhimovaa

10.05.2023 15:20

Информация в оперативную память поступает после … включения компьютеравыключения компьютераподключения внешних устройств...

Эльмаз07

11.01.2020 12:55

Задание 3 Дискета объёмом 1440 Кбайт весит 40 г. Сколько будет весить набор дискет, необходимый для полного копирования информации с жёсткого диска объёмом 80 Гбайт?...

lyda777

16.02.2022 13:55

В табличной форме представлен фрагмент базы данных о горных системах мира (см. рисунок). Сколько записей в данном фрагменте удовлетворяют условию (Часть света = «Европа»)...

lava777pop

02.04.2022 04:38

Зарплата агента складывается из постоянной части C и части, равной 10% от суммы продажи S . Ежедневно он посещает N =130 человек, которые с вероятностью Р =0,4 совершают...

timaglushko200

12.05.2022 09:17

Напишите наибольшее трёхзначное число x, для которого ИСТИННО высказывание: НЕ (первая цифра четная) И (x делится на 3)...

Флов227монстр

10.08.2020 22:04

Програма малюнку снижынкы в путоне...

Adele04

08.10.2020 19:58

В языке запросов посикового сервера для обозначения логической операции ИЛИ используется символ | , а для логической операции И символ @ в таблице приведены запросы...

алмаз122

16.01.2020 19:01

(Х 1)и(х 2)их,не равно 3)...

nakao85

25.03.2020 19:32

пароль от файлов: Tt4Fk5Cm6g сами файлы: https://oxy.st/d/fnLd...

tverikin1997

06.10.2020 12:48

Какие различия ты видишь в изображениях, нарисованных в векторном и растровом графических редакторах? ...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку