Вычисление приближенного значения двойного факториала

[coolmancool2000]

Вот задача
Вычисление приближенного значения двойного факториала
n!! = { 1*3*5...n, если n нечетное число если 2*4*6... n, n-будет четное)


написал программу но факториал если вводить 5 ответ 15 выходит а должно 120


var fch,fnech,f,i,n:integer;
begin
Writeln('Введи число n');
Readln(n);
fch:=1;
fnech:=1;
for i:=1 to n do
if i mod 2=0 then
begin
fch:=fch*i;
f:=fch;
end
else
fnech:=fnech*i;
f:=fnech;
Writeln(f);
Readln;
end.

[evg_m]

у else потерян begin ... end; (по аналогии с then)
или же

if n mod 2=0 then Writeln(fch) else WriteLn(fnech);

[Аватар]

Кроме всего прочего 5!! и есть 15 )) Другое дело 5!=120

[coolmancool2000]

а что дает 5!! это на сколько он умножает

[Аватар]

У тебя же в условии написано все ))

[Serge_Bliznykov]

Сообщение от coolmancool2000

а что дает 5!! это на сколько он умножает

Сообщение от coolmancool2000

n!! = { 1*3*5...n, если n нечетное

5 - нечётное.
поэтому при n=5, n!! = 5!! = 1*3*5 = 15
Ответ: 5!! = 15