Составьте программу вывода на экран всех делителей натурального числа N - Free Pascal

Free Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.56/34:

@ЮЮллиияя 9 / 9 / 0 Регистрация: 11.04.2013 Сообщений: 48
		1
	Составьте программу вывода на экран всех делителей натурального числа N 08.05.2013, 19:01. Показов 6115. Ответов 1 Метки нет (Все метки) Составьте программу вывода на экран всех делителей натурального числа N.(с помощью repeat , while) 0

Заказать работу у эксперта

Лучшие ответы (1)

Сообщение: #4527872

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

08.05.2013, 19:01

Ответы с готовыми решениями:

Составьте программу вывода на экран наибольшего делителя натурального числа T , большего 1
помогите составить программу по следующим задачам 1. Составьте программу вывода на экран...

Составьте программу вывода на экран всех натуральных чисел
Составьте программу вывода на экран всех натуральных чисел, не превосходящих N и делящихся на...

Составить программу нахождения для заданного натурального числа всех делителей, кратных числу
1. Дан одномерный массив, состоящий из вещественных элементов. Найти сумму элементов массива,...

Составьте программу вывода на экран всех простых чисел, не превосходящих заданного N
Составьте программу вывода на экран всех простых чисел, не превосходящих заданного N.Пожалуйста...

Erea

130 / 54 / 27

Регистрация: 13.03.2013

Сообщений: 162

08.05.2013, 19:10

Сообщение было отмечено ЮЮллиияя как решение

Решение

Pascal

Program MyProg;
uses crt;
var n, i: integer;
begin
clrscr;
readln(n);
i:=n;
clrscr;
Writeln('Deliteli chisla ',n,':');
repeat
if (n mod i) = 0 then
writeln(i);
i:=i-1;
until (i<1);
readln;
end.

или

Pascal

Program MyProg;
uses crt;
var n, i: integer;
begin
clrscr;
readln(n);
i:=n;
clrscr;
Writeln('Deliteli chisla ',n,':');
while i>0 do begin
if (n mod i) = 0 then
writeln(i);
i:=i-1;
end;
readln;
end.

	08.05.2013, 19:10

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

08.05.2013, 19:10

Помогаю со студенческими работами здесь

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

Составьте программу вывода на экран песочных часов
1. Напишите программу замены в тексте всех букв "a" на "o" и наоборот. 2.(вычислите...

Составьте программу вычисления степени натурального числа A с натуральным показателем n.
Составьте программу вычисления степени натурального числа A с натуральным показателем n.

Составьте программу заполнения и вывода на экран таблицы Пифагора(умножения).
Двумерные массивы.(с процедурами и функциями). Составьте программу заполнения и вывода на экран...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Опции темы

Новые блоги и статьи
Распознавание изображений (компьютерное зрение) на C++ InfoMaster 20.01.2025 Введение в компьютерное зрение и основы работы с изображениями Компьютерное зрение представляет собой одну из наиболее динамично развивающихся областей информационных технологий, позволяющую. . .	Какой язык программирования лучший для разработки нейронных сетей InfoMaster 20.01.2025 В современном мире технологий искусственные нейронные сети становятся неотъемлемой частью множества инновационных решений, от распознавания речи до автоматического управления транспортными. . .	Как подключить JavaScript файл в другом JavaScript файле InfoMaster 20.01.2025 В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .	Как откатить изменения в исходниках, не внесенные в Git InfoMaster 20.01.2025 При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .	В чем разница между px, in, mm, pt, dip, dp, sp InfoMaster 20.01.2025 В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .	Как изменить адрес удалённого репозитория (origin) в Git InfoMaster 20.01.2025 В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .
Как переместить последние коммиты в новую ветку (branch) в Git InfoMaster 20.01.2025 При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .	Как вернуть результат из асинхронной функции в JavaScript InfoMaster 20.01.2025 Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .	Какой локальный веб-сервер выбрать InfoMaster 19.01.2025 В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .	Почему планшеты и iPad уже не так популярны, как раньше InfoMaster 19.01.2025 Эра революционных инноваций История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .	Как самому прошить BIOS ноутбука InfoMaster 19.01.2025 BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .	Какой Linux выбрать для домашнего компьютера InfoMaster 19.01.2025 Современные реалии выбора операционной системы В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .

Наверх