Форум программистов, компьютерный форум, киберфорум
PHP для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.52/21: Рейтинг темы: голосов - 21, средняя оценка - 4.52
0 / 0 / 0
Регистрация: 14.04.2016
Сообщений: 128

Найти все пары «дружественных чисел», которые не больше данного числа N

14.03.2017, 09:04. Показов 4367. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Два натуральных числа называются «дружественными», если каждое из них равно сумме всех делителей (кроме его самого) другого (например, числа 220 и 284). Найти все пары «дружественных чисел», которые не больше данного числа N.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
14.03.2017, 09:04
Ответы с готовыми решениями:

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

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

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

2
 Аватар для N-Star
60 / 60 / 29
Регистрация: 03.11.2016
Сообщений: 292
Записей в блоге: 2
15.03.2017, 18:00
POWERED BY GOOGLE


PHP
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
<?php
$n = 1500;
 
for($i = 1; $i < $n; $i++)
{
    // Get sum of proper devisors of $i, and sum of div. of result.
    $currentDivs = sumDiv($i);
    $resultDivs = sumDiv($currentDivs);
    
    // Check for a match with sums not equal to each other.
    if($i == $resultDivs && $currentDivs != $resultDivs){
        echo "$i and $currentDivs  are amicable numbers</br>";
    }
}
 
// Function to output sum of proper divisors of $num
function sumDiv($num) {
    $result = 1; // All nums divide by 1
    $sqrt = sqrt($num);
    
    // Return 0 if $num below 1
    if($num <= 1) {
        return 0;
    }
    // Add divisors to result
    for ($i = 2; $i < $sqrt; $i++) {
        if ($num % $i == 0){
            $result += $i + $num / $i;
        }
    }
    // If perfect square add squareroot to result
    if (floor($sqrt) == $sqrt) {
        $result += $sqrt;
    }
    return $result;
}   
?>
0
15.03.2017, 22:45
Лучший ответ Сообщение было отмечено TheGrant как решение

Решение

Не по теме:

Цитата Сообщение от N-Star Посмотреть сообщение
PHP
1
2
3
4
// If perfect square add squareroot to result 
if (floor($sqrt) == $sqrt) {
    $result += $sqrt; 
}
PHP
1
for ($i = 2; $i * $i <= $num; $i++) {

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
15.03.2017, 22:45
Помогаю со студенческими работами здесь

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

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

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

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

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


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru