Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле

@T_015 · Регистрация: 16.10.2010

Студворк — интернет-сервис помощи студентам

Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле:
аi =i* аi-1 + аi-2 , где а1 = а2 = 1, i=3,4,5, …

@Puporev · 04.03.2011, 17:40

Pascal

uses crt;
function Rec(n:integer):integer;
begin
if n<3 then Rec:=1
else Rec:=Rec(n-2)+n*Rec(n-1);
end;
var n:integer;
begin
clrscr;
write('n=');
readln(n);
write('An=',Rec(n));
readln
end.

@T_015 0 / 0 / 0 Регистрация: 16.10.2010 Сообщений: 40
		1
	Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле 04.03.2011, 17:18. Показов 952. Ответов 1 Метки нет (Все метки) Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле: аi =i* аi-1 + аi-2 , где а1 = а2 = 1, i=3,4,5, … 0

Опции темы

Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле

Решение