Question

Составте программу вычисления произведения 1*3*5*...*(2*n-1).

Answer 1

Паскаль ABC.NET:
var
s,i,n:integer;
begin
writeLn('Введите n');
read(n);
i:=1;
s:=1;
while i<=(2*n-1) do
begin
s*=i;
I+=2;
end;
writeLn('Произведение равно ',s);
end.