Выведите все естественные делители числа x в порядке возрастания (включая 1

Выведите все натуральные делители числа x в порядке возрастания (включая 1 и само число). Входные данные Вводится естественное число x Выходные данные Выведите все делители числа x Образцы входные данные 7 выходные данные 1 7 входные данные 21 выходные данные 1 3 7 21

Задать свой вопрос
1 ответ

program zz1;
var x,i:integer; //заводим переменные
begin
write(введите число х);
read(x); //вводим с клавиатуры значение для х
for i:=1 to x do //организуем цикл, который переберет все числа от 1 до х
if x mod i = 0 then write(i, ); //проверяем, если i является делителем числа х, то выводим на экран число i в строчку через пробел

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт