Использование функции вычисления двойного факториала

@alexberry · Регистрация: 09.02.2014

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

Помогите, пожалуйста, решить.

Используя 6-значный учебный шифр (его обозначение - b1, b2, b3, b4, b5, b6), вычислить величины Fi (i=1,...6). (То есть в команде "Введите свой 6-значный шифр" я сам впишу его). При составлении программы использовать функцию вычисления факториала.

$https://www.cyberforum.ru/cgi-bin/latex.cgi?Fi = (bi\, mod\, 6\, +\, 2)!!$

@Puporev · 13.02.2014, 15:13

Функция двойного факториала
Без рекурсии

Pascal

function fac_2(n:integer):integer;
var i,f:integer;
begin
if odd(n) then i:=1
else i:=2;
f:=1;
while i<=n do
 begin
   f:=f*i;
  inc(i,2);
 end;
fac_2:=f
end;

Рекурсия

Pascal

function Fac_2(n:integer):longint;
begin
if n=1 then Fac_2:=1
else if n=2 then Fac_2:=2
else fac_2:=n*fac_2(n-2);
end;

@alexberry 0 / 0 / 0 Регистрация: 09.02.2014 Сообщений: 14
		1
	Использование функции вычисления двойного факториала 13.02.2014, 12:04. Показов 1368. Ответов 1 Метки нет (Все метки) Помогите, пожалуйста, решить. Используя 6-значный учебный шифр (его обозначение - b1, b2, b3, b4, b5, b6), вычислить величины Fi (i=1,...6). (То есть в команде "Введите свой 6-значный шифр" я сам впишу его). При составлении программы использовать функцию вычисления факториала. $https://www.cyberforum.ru/cgi-bin/latex.cgi?Fi = (bi\, mod\, 6\, +\, 2)!!$ 0

	13.02.2014, 15:13

Использование функции вычисления двойного факториала

Решение