• Нахождение дружественных чисел в Pascal

Текст задания

На интервале от «а» до «b» найдите дружественные числа. Дружественные числа по Пифагору такие, что каждое равно сумме всех делителей другого, исключая само это число. Например, 220 284. Делители числа 220 это 1+2+4+5+10+11+20+22+44+55+110=284, а сумма делителей числа 284 –это 1+2+4+71+142=220.

Решение

Для того, чтобы получить код программы на языке Pascal (с комментариями к каждой строке) необходимо добавить работу в корзину, оформить заказ и оплатить его. Сразу после оплаты Вы сможете скачать архив с PAS-файлом


Написать отзыв

Внимание: HTML не поддерживается! Используйте обычный текст!
    Плохо           Хорошо

Нахождение дружественных чисел в Pascal

  • 200.00 р.




Смотрите также

Нахождение автоморфных чисел в Pascal

Нахождение автоморфных чисел в Pascal

На интервале от «а» до «b» найдите автоморфные числа. Автоморфным числом называется такое число, кот..

200.00 р.

Нахождение счастливых троллейбусных билетов в Pascal

Нахождение счастливых троллейбусных билетов в Pascal

Найдите счастливые троллейбусные билеты, если номера билетов, принадлежат промежутку от «а» до «b». ..

200.00 р.

Нахождение чисел, равных сумме кубов своих цифр в Pascal

Нахождение чисел, равных сумме кубов своих цифр в Pascal

Существуют натуральные числа, равные сумме кубов своих цифр, например 370, 33+73+03=370Найдите такие..

200.00 р.

Нахождение чисел Армстронга в Pascal

Нахождение чисел Армстронга в Pascal

Числа, состоящие из n>1 цифр, называют числами Армстронга, если сумма его цифр, возведенных в n- ..

200.00 р.

Печать введенного числа в двоичной форме в Pascal

Печать введенного числа в двоичной форме в Pascal

Напечатайте любое введенное число n в двоичной форме.РешениеДля того, чтобы получить код программы н..

200.00 р.

Нахождение чисел палиндромов в Pascal

Нахождение чисел палиндромов в Pascal

Напечатайте числа палиндромы из интервала от «а» до «b». Числа палиндромы 121, 131.РешениеДля того, ..

200.00 р.

Печать числа римскими цифрами в Pascal

Печать числа римскими цифрами в Pascal

Представьте любое введенное число римскими цифрами.I IV V IX X XL L XC C CD D CM M1 4 5 9 10 40 50 9..

200.00 р.

Теги: Pascal

Не подошла работа?

Узнайте стоимость написания работы по Вашему заданию

(это быстро и бесплатно)

Узнать стоимость

Спасибо, не надо