Найдите рекурсивную и не рекурсивную подпрограмму , которая вычисляет творенье Р(n)

Найдите рекурсивную и не рекурсивную подпрограмму , которая вычисляет творенье Р(n) = 2*4*6*...*2n
Необходимо очень безотлагательно !!!

Задать свой вопрос
1 ответ

Ответ:

1) не рекурсивная

Begin

P=1;

Read(n);

For i:= 1 to n do

P:=p*2*i;

End.

2)рекурсивная

Function p(n:integer)

Begin

If n=1 then p:=1

Else p:=2*n*p(n-1);

End;

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт