Рекурсивная подпрограма вычисления...

@Danger Dominik · Регистрация: 17.11.2009

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

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

@Puporev · 18.01.2010, 13:21

Pascal

uses crt;
function F(n:integer):real;
begin
if n=1 then F:=1
else if n=2 then F:=0.3
else F:=(n+1)*F(n-2);
end;
var k:integer;
begin
clrscr;
write('k=');
readln(k);
write('Xk=',F(k):0:4);
readln
end.

@Danger Dominik 1 / 1 / 0 Регистрация: 17.11.2009 Сообщений: 30
		1
	Рекурсивная подпрограма вычисления... 18.01.2010, 12:22. Показов 1051. Ответов 1 Метки нет (Все метки) Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле: xi=(i+1)xi-2; где x1=1; x2=0.3; i =3,4,… 0

	18.01.2010, 13:21

Рекурсивная подпрограма вычисления...

Решение