Ответ:
program Divisors;
var
N,i: integer;
begin
readln(N);
for i:=N downto 1 do if N mod i = 0 then write(i,’ ‘);
end.
Похожие вопросы и ответы:
- Расположите числа -2,2;8,6;0,9;-6,8;-17,6;0;15 в порядке…
- Совокупность признаков (число, размеры, форма и т. д.)…
- Написать код на Python Напишите программу, которая переводит…
- у Саши есть конфеты: 6 мятных, 8 лимонных и 4 вишнёвых. Саша…
- Найдите промежутки возрастания и убывания функции y=x^2 + 6x…
- По известным свойствам функции постройте её график: -область…
- СРОЧНО ПОМОГИТЕ Напишите сочинение рассуждение. Объясните…
- Задание 2. Составить программу, выводящую на экран…
- Дано двузначное число. Сумма цифр в 4раза меньше самого…
- Прибавление второго числа к двум пятым первого равно 26, а…
- Напиши программу, которая принимает три целых…
- в игре «Русское лото» из мешка случайным образом выбираются…
- Помогите, пожалуйстаНапишите программу управления черепахой…
- Укажи в порядке возрастания все десятичные числа, не…
- Запишите в порядке возрастания все делители числа:а)24 -…