Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.05.2013, 17:25   #1
aisulyk
Новичок
Джуниор
 
Регистрация: 10.05.2013
Сообщений: 4
По умолчанию Pascal найти и вынести на экран 3 совершенных числа, больших некоторого m

Pascal найти и вынести на экран 3 совершенных числа, больших некоторого m. Пожалуйста помогите!!!
aisulyk вне форума Ответить с цитированием
Старый 10.05.2013, 18:31   #2
s-andriano
Старожил
 
Аватар для s-andriano
 
Регистрация: 08.04.2012
Сообщений: 3,229
По умолчанию

Помогаю советом:
- напишите определение совершенного числа.
s-andriano вне форума Ответить с цитированием
Старый 10.05.2013, 18:38   #3
aisulyk
Новичок
Джуниор
 
Регистрация: 10.05.2013
Сообщений: 4
По умолчанию совершенные числа

Число совершенно, если оно равно сумме всех своих делителей, кроме самого себя.
aisulyk вне форума Ответить с цитированием
Старый 10.05.2013, 18:54   #4
s-andriano
Старожил
 
Аватар для s-andriano
 
Регистрация: 08.04.2012
Сообщений: 3,229
По умолчанию

Цитата:
Сообщение от aisulyk Посмотреть сообщение
Число совершенно, если оно равно сумме всех своих делителей, кроме самого себя.
Тогда что нам нужно сделать, чтобы проверить, является ли число совершенным?
s-andriano вне форума Ответить с цитированием
Старый 10.05.2013, 18:59   #5
aisulyk
Новичок
Джуниор
 
Регистрация: 10.05.2013
Сообщений: 4
По умолчанию

через цикл проверить все делители. ну это понятно а как найти совершенные числа больше некоторого числа m/ если я наберу вместо m 1000000 надо найти 3 совершенных чисел больше 1000000. вот это не пойму как сделать.
aisulyk вне форума Ответить с цитированием
Старый 10.05.2013, 21:50   #6
Poma][a
Новичок
Джуниор
 
Регистрация: 11.10.2011
Сообщений: 3,882
По умолчанию

Костяк Вашей программы : тыц
Poma][a вне форума Ответить с цитированием
Старый 11.05.2013, 19:11   #7
aisulyk
Новичок
Джуниор
 
Регистрация: 10.05.2013
Сообщений: 4
По умолчанию

помогите напишите программу !!!
aisulyk вне форума Ответить с цитированием
Старый 12.05.2013, 21:19   #8
hon
Форумчанин
 
Регистрация: 08.06.2011
Сообщений: 693
По умолчанию

Жмите на ссылку:
http://forum.pascalnet.ru/index.php?...36&#entry32236

Тут уже все написано.
hon вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
В С++ определить количество цифр в числе, являющихся квадратами некоторого числа mmf_Valya Помощь студентам 1 20.10.2012 19:13
Ввести массив вещественных чисел NxM для заданной строки массива найти два самых больших числа (на C#) владислав10 Помощь студентам 1 10.04.2011 14:10
Pascal для определения 5 первых совершенных чисел T@tali Помощь студентам 2 06.05.2010 22:10
вывод совершенных числе в Pascal otlichniza Помощь студентам 3 12.11.2009 10:37
Найти произведение цифр натурального числа, больших В microlab Помощь студентам 6 23.12.2008 20:46