Дано натуральное число n. Вычислить y=2*4*6...(2n) .сделать через цикл с параметром!!!Срочно!
var y,i,n:integer;
begin
readln(n);
y:=1;
for i:=1 to n do
y:=y*2*i;
writeln(y);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Дано натуральное число n. Вычислить y=2*4*6...(2n) .сделать через цикл с параметром!!!Срочно!
var y,i,n:integer;
begin
readln(n);
y:=1;
for i:=1 to n do
y:=y*2*i;
writeln(y);
end.