Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
serartem73
22.01.2023 03:36 •
Информатика
Для каждого натурального числа в промежутке [m; n] вывести все делители, кроме единицы и самого числа. m и n вводятся с клавиатуры. выводить в формате число: делители.
Показать ответ
Ответ:
CrowOnix
25.08.2020 17:26
//Pascal ABC.NET 3.1 сборка 1256
Var
m,n,i,j:integer;
begin
readln(m,n);
for i:=m to n do
begin
write(i,':');
for j:=2 to i div 2 do
if i mod j=0 then write(j:4);
writeln;
end;
end.
Пример ввода:
12
16
Пример вывода:
12: 2 3 4 6
13:
14: 2 7
15: 3 5
16: 2 4 8
0,0
(0 оценок)
Популярные вопросы: Информатика
okrushko
18.12.2022 05:14
Ей было 1100 лет, она в 101 класс ходила, в портфеле по 100 книг носила – все это правда, а не бред, когда пыля десятком ног, она шагала по дороге, за ней всегда бежал щенок с...
popopoppop2016
03.04.2021 01:03
1содержит ли какую-либо информацию таблица, в которой нет полей: выберите отве содержит информацию о будущих записяхосодержит информацию о типах данныхс не содержит никакой информацииосодержит...
vinogradka009
10.06.2021 01:57
Какой объем видеопамяти необходим для хранения графического изображения, занимающего весь экран монитора с разрешением 400*320, если глубина цвета равна 24. ответ дайте в килобайтах....
алгебра107
30.11.2020 12:42
Отвечаем на вопросы 1.2.3.Как обрабатывать видео?Что такое видеоэффекты?Как сохранить видео?Думаем и обсуждаем1. Для чего нужно обрабатывать видео?2. Для чего в видео добавляют...
victoria223
08.10.2021 22:20
1.для стоянки машин выделили площадку прямоугольной формы , примыкающую одной стороной к стене здания. площадку обнесли с трех сторон металлической сеткой длиной 200 м, и площадь...
KIRAERM
08.10.2021 22:20
Ужителя села недесятичное в саду имеются 122 плодовых деревьев,из них 53 груши и 25 яблонь; и 112 кустов крыжовника и 15 кустов смородины.систему счисления, с каким основание используют...
lenaguceva
08.10.2021 22:20
Какие числа стоят между числами -5 и 5 . напиши. сравни поставвь знаки = если x равняется 8. -2+x 3+5 x-9 -2 4-x. -3...
kiranovm14
08.10.2021 22:20
3.из круглого бревна вырезают с прямоугольным сечением наибольшей площадки. найти размеры сечения . если радиус сечения бревна равен 20....
sergeyshevchukp06kj3
08.03.2023 20:40
В каких сферах используются облачные сервисы:Oracle, Care Cold и т. д? ...
лёша2002z
03.02.2021 03:32
Оқулықтың әрбір бетінде 40 жол, әрбір жолында 60 символ бар. Оқулықтығы ақпараттың өлшемін анықтандар....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var
m,n,i,j:integer;
begin
readln(m,n);
for i:=m to n do
begin
write(i,':');
for j:=2 to i div 2 do
if i mod j=0 then write(j:4);
writeln;
end;
end.
Пример ввода:
12
16
Пример вывода:
12: 2 3 4 6
13:
14: 2 7
15: 3 5
16: 2 4 8