Найти все делители целого положительного числа - Turbo Pascal

Turbo Pascal

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

Войти

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

Рейтинг 4.57/21:

@disfatum 0 / 0 / 0 Регистрация: 10.10.2013 Сообщений: 28

	Найти все делители целого положительного числа 17.10.2013, 18:29. Показов 4119. Ответов 1 Метки нет (Все метки) Найти все делители целого положительного числа 0

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

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

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

cpp_developer

Эксперт

20123 / 5690 / 1417

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

Сообщений: 22,546

Блог

17.10.2013, 18:29

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

Вывести все делители заданного целого числа
Помогите решить пару задач! 3) По теме Циклы с неизвесстным числом повторений Написать программу,выводящую все делители заданного...

Записать в ряд все числа Фибоначчи, не превосходящие целого положительного числа n
type ряд=file of l..maxint; Описать процедуру fib(f,n), записывающую в ряд f все числа Фибоначчи (1, 1, 2, 3, 5, ...), не превосходящие...

Вывести все делители целого числа в порядке убывания
6.1 Составить программу, печатающую все делители целого числа в порядке убывания. _____________________Заранее Всем Огромное...

Kodzaev

3030 / 1916 / 1649

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

Сообщений: 3,060

17.10.2013, 18:55

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

Решение

Не считая единицу и само число:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  i, n: longint;
 
begin
  repeat
    Write('Введите целое положительное число: ');
    Readln(n);
  until n > 0;
  Writeln('Все делители этого числа:');
  for i := 2 to n div 2 do
    if n mod i = 0 then
      Write(i, #32);
  Readln
end.

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

raxper

Эксперт

30234 / 6612 / 1498

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

Сообщений: 21,154

Блог

17.10.2013, 18:55

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

Написать программу, выводящую все делители заданного целого числа
Выручите решите эти задачи 1 надо решить 2-мя способами с пред условием и пост условием!а 2-я на процедуры !Заранее спасибо! ...

Найти самую большую цифру целого положительного числа
Найти самую большую цифру целого положительного числа.

Описать функцию целого типа, возвращающую N-ю цифру целого положительного числа K
описать функцию DigitN (K,N) целого типа ,возвращающую N-ю цифру целого положительного числа K ( цифры в числе нумеруются справа налево ....

Описать функцию целого типа, находящую количество цифр целого положительного числа K
Описать функцию DigitCount(K) целого типа, находящую количество цифр целого положительного числа K. Используя Описать функцию DigitCount(K)...

Описать функции DigitCount (k) целого типа, находящую количество цифр целого положительного числа К
Описать функции DigitCount(k) целого типа, находящую количество цифр целого положительного числа К. Используя эту функцию, найти количество...

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

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

Опции темы

Новые блоги и статьи Все статьи Все блоги /
Система статов в Unity GameUnited 20.04.2025 Статы — фундаментальный элемент игрового дизайна, который определяет характеристики персонажей, предметов и других объектов в игровом мире. Будь то показатель силы в RPG, скорость передвижения в. . .	Статические свойства и методы в TypeScript run.dev 20.04.2025 TypeScript прочно занял своё место в системе современной веб-разработки. Этот строго типизированный язык программирования не просто расширяет возможности JavaScript — он делает разработку более. . .	Batch Transform и Batch Gizmo Drawing API в Unity GameUnited 20.04.2025 В мире разработки игр и приложений на Unity производительность всегда была критическим фактором успеха. Создатели игр постоянно балансируют между визуальной привлекательностью и плавностью работы. . .	Звук в Unity: Рандомизация с Audio Random Container GameUnited 20.04.2025 В современных играх звуковое оформление часто становится элементом, который либо полностью погружает игрока в виртуальный мир, либо разрушает атмосферу за считанные минуты. Представьте: вы исследуете. . .	Максимальная производительность C#: Советы, тестирование и заключение stackOverflow 20.04.2025 Погружение в мир микрооптимизаций C# открывает перед разработчиком целый арсенал мощных техник. Но как определить, где и когда их применять? Ответ начинается с точных измерений и профилирования. . . .
Максимальная производительность C#: Предсказание ветвлений stackOverflow 20.04.2025 Третий ключевой аспект низкоуровневой оптимизации — предсказание ветвлений. Эта тема менее известна среди разработчиков, но её влияние на производительность может быть колоссальным. Чтобы понять. . .	Максимальная производительность C#: Векторизация (SIMD) stackOverflow 20.04.2025 Помимо работы с кэшем, другим ключевым аспектом низкоуровневой оптимизации является векторизация вычислений. SIMD (Single Instruction, Multiple Data) позволяет обрабатывать несколько элементов данных. . .	Максимальная производительность C#: Процессорный кэш stackOverflow 20.04.2025 Знакомство с внутренним устройством процессорного кэша — ключевой шаг в написании по-настоящему быстрого кода на C#. Этот слой архитектуры компьютера часто ускользает от внимания разработчиков, но. . .	Максимальная производительность C#: Введение в микрооптимизации stackOverflow 20.04.2025 В мире разработки на C# многие привыкли полагаться на . NET Runtime, который "магическим образом" сам оптимизирует код. И часто это работает - современные JIT-компиляторы творят чудеса. Но когда речь. . .	MVC фреймворк в PHP Jason-Webb 19.04.2025 Архитектурный паттерн Model-View-Controller (MVC) – это не просто модный термин из мира веб-разработки. Для PHP-программистов это фундаментальный подход к организации кода, который радикально меняет. . .

Наверх