Ответы на вопрос:
Var a,i : longint; begin readln(a); for i: =1 to a do if a mod i = 0 then writeln(i); end.
Популярно: Информатика
-
Составьте программу вычисления периметра, площади прямоугольного...
alena321120.04.2023 00:56 -
Укажите правильную запись на языке Паскаль арифметического выражения...
Vilka200811.09.2020 06:39 -
Дан фрагмент электронной таблицы в режиме отображения формул...
chalenkotaya22.07.2022 03:24 -
Не работают браузеры и соц.сети, а приложения работаю! не надо писать...
danchik5628.04.2022 19:12 -
Как называется граф, вершины которого соединены дугами?...
MariaWans0724.10.2022 22:27 -
Количество точек, выводимых на один дюйм изображения – это: 1.разрешающая...
тони200610.06.2021 22:36 -
Написать алгоритм для ивана царевича как уничтожить кощея безсмертного...
RageTeenage06.12.2021 07:47 -
Набор действий, записанный на языке, понятном компьютеру. выберите...
мандаринылюблю27.02.2022 02:28 -
Кто исполнил песню волшебник недоучка?...
kiryagartman19.12.2020 20:58 -
Попытались угадать, сколько рыбок в аквариуме. предлагали варианты...
zakenalma19.06.2020 05:56