IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Совершенные числа, и что-то еще про цикл.
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Мужской

Репутация: -  0  +


Составить программу для графического изображения делимости чисел от 1 до n (n - исходное данное). В каждой строке надо печатать число и сколько плюсов, сколько делителей у этого числа. Например, если исходное данное - число 4, то на экране должно быть напечатано:


1+

2++

3++

4+++

Составить программу получения всех совершенных чисел, меньших заданного числа n. Число называется совершенным, если равно сумме всех своих положительных делителей, кроме самого этого числа. Например, 28 - совершенно, так как 28=1+2+4+7+14.
Даны натуральные числа n, m. Получить все меньшие n натуральные числа, квадрат суммы цифр которых равен m.
Даны натуральные числа n и m. Найти все пары дружественных чисел, лежащих в диапазоне от n до m. Два числа называются дружественными, если каждое из них равно сумме всех делителей другого (само число в качестве делителя не рассматривается).
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
Ромка   Совершенные числа   21.02.2005 0:31
volvo   Правила читать будем? FAQ и поиск зачем? Совершенн…   21.02.2005 0:47
Ромка   ne nashol !!!   21.02.2005 0:52
Altair   плохо искал.   21.02.2005 1:04
is there a legitimate canadian p   cialis naproxen   3.11.2021 12:19
Ромка   Rebjat, mozhet prosto pomozhete... Esli vam vsjo j…   21.02.2005 1:07
Altair   [b]Поиск совершенных чисел. [code]VAR I,N,Summa…   21.02.2005 1:50
Ромка   pishel ordinal expression expected na etoj stroke …   21.02.2005 1:58
Altair   так: VAR I,N,Summa: LONGINT; Delitel: INTEGER;…   21.02.2005 2:20
Altair   еще один пост на транслите и тема будет закрыта…   21.02.2005 2:26
Ромка   ссори, не заметил твоё мсг. всё транслиту - нет …   21.02.2005 2:27
buy zithromax z-pak without pres   Low Testosterone Bph Propecia   21.12.2021 0:44
Ромка   Даны натуральные числа n и m. Найти все пары друже…   21.02.2005 22:20
Altair   а ты покажи что получается... Код в студию, что уж…   21.02.2005 22:30
Ромка   uses crt; var n,m,del1,del2,per,vtor,summ1,summ2…   21.02.2005 22:59
volvo   Нет, она не виснет, она просто очень долго считает…   21.02.2005 23:29
Ромка   Спасибо. Ну может кто-то знает полегче вариант, а …   22.02.2005 1:06
volvo   Чем легче вариант - тем дольше он будет работать.…   22.02.2005 1:12
Ромка   Спасибо, вы очень помогли!   22.02.2005 1:30


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 25.04.2024 17:43
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name