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

Turbo Pascal

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

Рекурсия: вычислить сумму произведений натуральных чисел - Turbo Pascal

29.09.2010, 13:32. Просмотров 397. Ответов 1
Метки нет (Все метки)

Цель работы: Выполнить необходимую обработку, при этом описать рекурсивную процедуру или функцию, исходя из условия задачи. Исходные данные задать самостоятельно, учитывая специфику задачи.

Задача: Дано натуральное число п. Вычислить: 1 2 + 2 3 4 + … + n (n + 1) … 2n.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
29.09.2010, 13:32
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Рекурсия: вычислить сумму произведений натуральных чисел (Turbo Pascal):

Рекурсия: сумма произведений соседних натуральных чисел - Turbo Pascal
СРОЧНО!!!! пожалуйста решите! Дано натуральное число n. Вычислить 1*2+2*3+3*4+… Требования к отчету. 1) условие задачи. 2) Запись...

Дано п вещественных чисел. Вычислить сумму произведений каждого из этих чисел на его номер с конца последовательности - Turbo Pascal
Вот задача помогите: Дано п вещественных чисел. Вычислить сумму произведений каждого из этих чисел на его номер с конца последовательности.

Дано n вещественных чисел. Вычислить сумму произведений каждого из этих чисел на его номер с конца последовательности - Turbo Pascal
Решите задачу....пожалуйста... Дано n вещественных чисел. Вычислить сумму произведений каждого из этих чисел на его номер с конца...

Вычислить сумму произведений всех пар соседних чисел - Turbo Pascal
Здравствуйте,не могу решить две задачи=(Помогите пожалуйста=) 1)Задан одномерный числовой массив. Вычислить сумму произведений всех пар...

Вычислить сумму произведений всех троек соседних чисел массива - Turbo Pascal
Дан одномерный числовой массив Т(к).Вычислить сумму произведений всех троек соседних чисел. Помогите пожалуйста. Добавлено через 1...

Вычислить сумму произведений всех пар соседних чисел - массивы - Turbo Pascal
Вычислить сумму произведений всех пар соседних чисел - задача на одномерный массив ( при написании нужно использовать fuktion или procedure)

1
Puporev
Модератор
54019 / 41652 / 14731
Регистрация: 18.05.2008
Сообщений: 97,916
29.09.2010, 19:59 #2
Что-то одной функцией не придумал, поэтому 2.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
uses crt;
function Sum(n:integer):extended;
function Fak(n:integer):extended;
begin
if n=1 then Fak:=1 else Fak:=Fak(n-1)*n;
end;
begin
if n=1 then Sum:=2
else Sum:=Sum(n-1)+Fak(2*n)/Fak(n-1);
end;
var a:integer;
begin
clrscr;
write('a=');
readln(a);
write('Summa=',Sum(a):0:0);
readln
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
29.09.2010, 19:59
Привет! Вот еще темы с ответами:

Вычислить сумму произведений всех пар соседних чисел массива - Turbo Pascal
Задан одномерный числовой массив. Вычислить сумму произведений всех пар соседних чисел.

Вычислить сумму квадратов натуральных чисел - Turbo Pascal
Помогите прогу написать.... вычислить сумму квадратов натуральных чисел. условия: пока кводрат очередного числа не превысит 81!!!!

Вычислить сумму S первых N натуральных чисел - Turbo Pascal
Вычислить сумму S первых N натуральных чисел. Если S < 50, то вычислить сумму S1 четных натуральных чисел в пределах до N и вывести ее на...

Вычислить сумму n первых натуральных чисел - Turbo Pascal
у меня есть 2 вопроса на которые не могу найти ответ, если можете помогите Надо: 1) написать процедуру которая вычисляет сумму n...


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

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

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