Число называется совершенным если оно равно сумме

Число называется совершенным если оно равно сумме

Задача

Число совершенно, если оно равно сумме всех своих делителей, кроме самого себя. Пример: 6=1+2+3. Найдите все совершенные числа от 1 до 1000 и выведите их на экран. Подсказка: вам необходимо найти все делители от 1 до исследуемого числа. Делителем числа называется число, которое делит данное без остатка (a mod b=0).

Решение

Алгоритм решения задачи:

  1. Каждое число от 1 до 1000 поочередно делить на все целые числа от 1 до этого числа. Все найденные делители помещать в массив.
  2. Найти сумму всех делителей и сравнить с самим числом. Если сумма и число равны, то последнее является совершенным.

Программа на языке Паскаль:

Делители можно сразу суммировать, а не помещать их сначала в массив.

Угловаяскоростьвращающегосятелаизменяетсяпоследующемузакону:ω=2t 3t2 (рад/с). Накакойуголповернётсятелозатретьюсекундусвоегодвижения?(24 рад)

В чём вы видите психологический эффект газовой атаки германских войск под Ипром?

Помогите,пожалуйста,сделать задание:Make questions.Then ask and answer.1. Ben/in 6A? IS BEN IN 6A.2.Ben/your best friend? 3.Micki/in 6A?4.Sophie/a new girl?5.You/ten?6.You/in 6a?

Бактерии, способные в результате своей жизнедеятельности производить кислород :а)цианобактерии; б)гниения; в) болезнетворные; г) клубеньковые ?

Ответы на вопрос

a,b: array [1..100] of integer;

for i: =1 to 20 do

for j: =a to b do

if (a[i]=j) and (a[i] mod 7 =0) then f: =1;

for i: =1 to k do

a,b: array [1..100] of integer;

for i: =1 to 20 do

for i: =1 to 19 do

if a[i]*a[i+1]> 0 then

for i: =1 to j do

a,b: array [1..20] of integer;

if k1 #include #include using namespace std; void main() < setlocale(lc_ctype,"rus"); int x, sum=0; cout >x; for(int i=1; i

Читайте также:  Как подключить приставку ростелеком к старому телевизору
Ссылка на основную публикацию
Хороший ламповый усилитель для дома
Почти у каждого ненормального с гитарой (а иногда даже и без нее) появляется навязчивая идея принести домой фанерный ящик с...
Файлы mdi чем открыть
Если вы не смогли открыть файл двойным нажатием на него, то вам следует скачать и установить одну из программ представленных...
Файлы mdx чем открыть
MDX - это формат образов дисков, который был создан разработчиками программы DAEMON Tools. Это формат был создан в результате усовершенствования...
Хороший переводчик английского языка
Оцените наш проект! Правильный переводчик онлайн позволяет довольно качественно и оперативно выполнять следующие операции: - изучать один либо одновременно несколько...
Adblock detector