Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.66/29: Рейтинг темы: голосов - 29, средняя оценка - 4.66
0 / 0 / 0
Регистрация: 24.10.2015
Сообщений: 20
1

Найти все пары дружественных чисел в заданном диапазоне

11.02.2016, 21:24. Показов 5614. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
1.Дружественные числа -– это два натуральных числа, таких, что сумма всех делителей одного числа (меньших самого этого числа) равна другому числу, и наоборот. Напишите программу, которая находит все пары дружественных чисел в заданном диапазоне. Используйте функцию, которая вычисляет сумму делителей числа.

Входные данные
Входная строка содержит два натуральных числа – границы диапазона a и b . Гарантируется, что a ≤ b .

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

Если в заданном диапазоне нет дружественных чисел, программа должна вывести 0.
входные данные
1 100
выходные данные
0
входные данные
200 500
выходные данные
(220,284)



2.Простое число называется гиперпростым, если любое число, получающееся из него откидыванием нескольких последних цифр, тоже является простым. Например, число 733 -– гиперпростое, так как и оно само, и числа 73 и 7 -– простые. Напишите программу, которая определяет, верно ли, что переданное ей число N – гиперпростое. Используйте функции. Учтите, что число 1 не считается простым.

Входные данные
Входная строка содержит натуральное число N .

Выходные данные
Программа должна вывести слово 'YES', если переданное её число – гиперпростое, и слово 'NO', если это число не гиперпростое.

Примеры
входные данные
733
выходные данные
YES
входные данные
1734
выходные данные
NO
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.02.2016, 21:24
Ответы с готовыми решениями:

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

Найти все пары дружественных чисел, оба из которых принадлежат промежутку от M до N
Два различных натуральных числа называются дружественными, если первое из них равно сумме делителей...

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

Найти все пары “дружественных чисел”, которые не больше данного числа N (Pascal ABC)
Два натуральных числа называются “дружественными”, если каждое из них равно сумме всех делителей...

1
Эксперт Pascal/Delphi
6810 / 4567 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
12.02.2016, 09:25 2
Запрещено создавать темы с множеством вопросов во всех разделах, кроме разделов платных услуг. Один вопрос - одна тема.
Как можно быстрее(
Запрещено создавать темы с бессмысленными названиями вроде "Помогите!", "Вопрос" и т.п.
 Комментарий модератора 
Тема закрыта.
0
12.02.2016, 09:25
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.02.2016, 09:25
Помогаю со студенческими работами здесь

В массиве найти все пары "дружественных" чисел, которые не больше заданного числа N
Помогите решить пожалуйста задачи на массивы. 1. 2 натуральных числа называются...

Из заданного интервала натуральных чисел выбрать и напечатать все пары дружественных чисел
Из заданного интервала натуральных чисел выбрать и напечатать все пары дружественных чисел. (Два...

процедуры:Найти все пары дружественных...
Решите пожалуйста задачу: Найти все пары дружественных чисел которые не больше данного числа К.

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


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

Или воспользуйтесь поиском по форуму:
2
Закрытая тема Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru