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

Дано число n. найти все его делители.

Ответ:

Govnoegc

01.10.2020 11:43

Uses crt;
var a,i:integer;
begin
readln(a);
for i:=1 to (a div 2) do
if (a mod i=0) then writeln(i);
writeln(a);
end.

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

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

Neal12

29.06.2021 11:01

Массив а размер 12 заполняется случайными целыми числами из интервала (-100; 50). найти произведение положительных элементов массива....

sashaprofatilo

05.05.2021 06:10

ПРОСТО УМОЛЯЮЮЮЮ Нужно сделать номер 12(а) , 13(а), 14(а). ...

GarryPotter15

02.05.2022 06:29

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

д2и0а0н6а

27.01.2020 16:26

Напишите наибольшее целое число x, для которого истинно высказывание (x 17) и не (x 44) решите всё задания...

yoanna0900

30.04.2021 11:37

4. Что означает английское сокращение OCR? боло б до с оптическое распозначение стволов сканирование фотографий обработку изображений ал редактирование текста ОХудожественную фотографию...

polinaxt1

08.02.2020 14:42

Какая основная мысль текста в лесу стоял большой старый пень. пришла бабушка с сумкой, поклонилась пню и пошла дальше. пришли две маленькие девочки с кузовками, поклонились пню...

Appledog

08.02.2020 14:42

Решить по действиям 28051+(90847-65403)*3-2895=...

romannikodov

08.02.2020 14:42

Сумма вертикальных углов aob и сод, образованных при пересечении прямых ад и св, равна 210°. найдите угол аос....

LadyBoy357

08.02.2020 14:42

Вянваре было израсходовано 4,4 тонн угля феврале пять целых 13 25 тонн на сколько процентов возросло затраты угля в феврале по сравнению с январем...

12853

08.02.2020 14:42

Годиннику з боєм потрібно 30 секунд, щоб пробити 6 годин. скільки секунд годинник буде пробивати 12 годин?...

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

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