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

Вводится число n, найдите все его делители. паскаль

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

wrrrr

19.09.2020 04:06

2. Заполните данные по оценкам с использованием функции получения случайных чисел в пределах от 5 до 10 включительно (=СЛУЧМЕЖДУ(5;10)). 3. Выполнить подсчет в столбце «Общий...

mrtwesor

01.04.2020 08:44

ответить на во Как ты используешь информацию из сети Интернет для выполнения заданий или проектов?2) Что такое авторское право?3) Для чего нужно делать ссылки на информацию,...

annaeychinas

22.06.2020 18:18

Программа на с++ напишите программу, которая вводит натуральные числа a и b , и выводит сумму квадратов натуральных чисел в диапазоне от a до b . входные данные входная строк...

Ann4121

22.06.2020 18:18

Программа на c++ напишите программу, которая вводит натуральные числа a и b , и выводит квадраты натуральных чисел в диапазоне [ a , b ] . входные данные входная строка содержит...

hasmikaydinyan

22.06.2020 18:18

Написать программу, вычисляющую стоимость покупки, состоящей из 2-х модулей оперативной памяти (ram) по 450 руб. за штуку и 3-х сетевых карт по 300 руб. за штуку. количество...

Fizun

06.02.2022 07:07

Выберете правильную форму записи составного оператора: begin последовательность операторов последовательность операторов endbegin условие endbegin последовательность операторов...

sinchugov2001

18.04.2023 14:55

Задание 5. Определите, какие из утверждений являются верными: А) при копировании фрагмента таблицы ссылки на абсолютные адреса ячеек в копируемых формулах остаются неизменными;В)...

Gogi354

16.11.2020 10:08

Надо составить алгоритмы:блок схемы и светвления...

BTS48

20.11.2020 22:42

Указание на источник, который был использован автором в ходе написания работы - это: * ГиперссылкаЗакладкаСсылкаСноска...

Ариана141197374

31.08.2020 11:34

По сценам бабьего бунта, заседания райкома партии, пашни Давыдова отследить через синквейны развитие характеров сторонников и противников коллективизации: Давыдов, Нагульнов,...

Ответ:

AlexxP

05.10.2020 18:06

Var
n,i:integer;
Begin
Write('n = ');ReadLn(n);
For i:= 1 to n do
if n mod i = 0 then Write(i,' ')
End.

0,0(0 оценок)

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

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