Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal (Паскаль)

Войти
Регистрация
Восстановить пароль
 
DarikS
0 / 0 / 0
Регистрация: 14.05.2010
Сообщений: 11
#1

Получить члены последовательности - Pascal

14.05.2010, 00:44. Просмотров 299. Ответов 6
Метки нет (Все метки)

Помогите решить задачку пожалуйста. -- Дано натуральное число n и целые числа A1....An.Получить все члены последовательности, являющиеся совершенными числами.
з.ы.заранее спасибо
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.05.2010, 00:44
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Получить члены последовательности (Pascal):

Получить все члены последовательности - Pascal
Помогите пожалуйста решить такую задачу: Даны натуральное число n, целые числа A1..A25 и B1..Bn. Среди A1..A25 и B1..Bn нет...

Получить X1Y1+...+XsYs, где X1...Xp - отрицательные члены последовательности r1...r17, взятые в порядке их следования... - Pascal
Помогите разобраться, не правильно работает скрипт, идей больше нет. Условие : Даны действительные числа r1...r17, среди которых...

Найти члены qi последовательности - Pascal
Даны натуральные числа n , q1,q2.....qn. Найти члены qi последовательности q1,q2...qn , которые обладают тем свойством , что корни...

Найти члены последовательности по заданному условию - Pascal
Дано число D (> 0). Последовательность чисел AN определяется следующим образом: A1 = 2, AN = 2 + 1/AN–1, N = 2, 3, ... Найти первый из...

создать функцию и Найти члены ak последовательности - Pascal
Даны натуральные числа n, a1,…,an, где n≤2500. Найти члены ak последовательности a1,…,an, удовлетворяющие условию (2^k)< (ak-1+ak+1)/2, и...

В последовательности а1, а2, ..., аn все отрицательные члены увеличить на 0,5 - Pascal
Пусть дано натуральное число п и вещественные числа а1, а2, ..., аn. В последовательности а1, а2, ..., аn все отрицательные члены увеличить...

6
AnTro.Net
131 / 127 / 16
Регистрация: 28.04.2010
Сообщений: 930
14.05.2010, 03:29 #2
что такое совершенное число?

простите за вопрос, но все же.
1
Puporev
Модератор
52399 / 40246 / 13579
Регистрация: 18.05.2008
Сообщений: 93,031
14.05.2010, 07:05 #3
что такое совершенное число?
И после этого ты во всех темах предлагаешь платные услуги, фрилансер недоделанный?
0
AnTro.Net
131 / 127 / 16
Регистрация: 28.04.2010
Сообщений: 930
14.05.2010, 10:02 #4
я просто неправильно прочел слово))
0
DarikS
0 / 0 / 0
Регистрация: 14.05.2010
Сообщений: 11
14.05.2010, 15:18  [ТС] #5
Блин. помогите с решением пожалуйста
0
Puporev
Модератор
52399 / 40246 / 13579
Регистрация: 18.05.2008
Сообщений: 93,031
14.05.2010, 15:33 #6
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program poln_chis;
uses crt;
var n,i,k,j:longint;
begin
clrscr;
write('n=');readln(n);
for i:=1 to n do
   begin
    k:=0;
    for j:=1 to i-1 do
       if i mod j=0 then
          begin
            k:=k+j;
          end;
       if k=i then write(i,' ');
     end;
  readln;
end.
почитайте хоть на досуге.
http://ru.wikipedia.org/wiki/%D0%A1%...81%D0%BB%D0%BE
0
DarikS
0 / 0 / 0
Регистрация: 14.05.2010
Сообщений: 11
14.05.2010, 21:59  [ТС] #7
огромное спасибо
0
14.05.2010, 21:59
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.05.2010, 21:59
Привет! Вот еще темы с ответами:

Вывести члены последовательности с нечетными номерами. Рекурсия - Pascal
Дана последовательность натуральных чисел (одно число в строке), завершающаяся числом 0. Выведите первое, третье, пятое и т.д. из введенных...

В последовательности все члены, следующие за наибольшим, заменить на 0.5 - Pascal
Даны действительные числа a1...an, b1...bm. В последовательности a1...an и в последовательности b1...bm все члены, следующие за членом с...

Найти все члены последовательности, что удовлетворяют условию - Pascal
не могу никак написать программу =( помогите, может у кого нибудь есть похожая Даны натуральные числа n, q1, q2,…, qn. найти те...

Текстовый файл. В последовательности положительные члены увеличить на 0,5, а отрицательные на 1 - Pascal
В текстовом файле содержится последовательность действительных чисел. В заданной последовательности положительные чле-ы увеличить на 0,5,...


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru